#include "wiring.h"
#include <cassert>
#include <cstdio>
#include <bits/stdc++.h>
using namespace std;
typedef long long lo;
typedef pair< lo,lo > PII;
#define fi first
#define se second
//~ #define int long long
#define mp make_pair
#define pb push_back
#define fio() ios_base::sync_with_stdio(false);cin.tie(NULL);cout.tie(NULL)
#define FOR for(int i=1;i<=n;i++)
#define mid ((start+end)/2)
#define ort ((bas+son)/2)
const lo MAX = -1000000000000000000;
const lo MIN = 1000000000000000000;
const lo inf = 100000000000000000;
const lo KOK = 100000;
const lo LOG = 30;
const lo li = 500005;
const lo mod = 1000000007;
lo n,m,b[li],a[li],k,flag,t,dp[304][304];
lo cev;
string s;
vector<int> v;
queue<PII> q;
//~ inline lo f(lo x,lo y,vector<int> r1,vector<int> r2){
//~ lo cevv=inf;
//~ if(x>=(int)r1.size()){
//~ if(y==(int)r2.size())return 0;
//~ return inf;
//~ }
//~ if(y>=(int)r2.size()){
//~ if(x==(int)r1.size())return 0;
//~ return inf;
//~ }
//~ if(~dp[x][y])return dp[x][y];
//~ cevv=min(cevv,f(x+1,y+1,r1,r2)+abs(r2[y]-r1[x]));
//~ cevv=min(cevv,f(x+1,y,r1,r2)+abs(r2[y]-r1[x]));
//~ cevv=min(cevv,f(x,y+1,r1,r2)+abs(r2[y]-r1[x]));
//~ return dp[x][y]=cevv;
//~ }
long long min_total_length(vector<int> r, vector<int> b) {
lo at=0,bt=0;
multiset<int> st,st1;
if(r.size()>b.size())swap(r,b);
for(int i=0;i<(int)b.size();i++){
st.insert(b[i]);
}
for(int i=0;i<(int)r.size();i++){
st1.insert(r[i]);
}
reverse(r.begin(),r.end());
for(int i=0;i<(int)r.size();i++){
if(st.size()==st1.size())break;
auto it=st.end();
if(it!=st.begin()){
it--;
cev+=abs(*it-r[i]);
//~ st1.erase(r[i]);
st.erase(it);
continue;
}
}
auto it1=st1.begin();
for(auto it=st.begin();it!=st.end();it++){
cev+=abs(*it-*it1);
it1++;
}
return cev;
}
