#include "wiring.h"
#include <bits/stdc++.h>
using namespace std;
#define pb push_back
#define ss second
#define ff first
#define sz(a) int(a.size())
#define all(a) a.begin(),a.end()
typedef long double ld;
typedef long long ll;
typedef pair<int,int> pii;
typedef pair<ll,ll> pll;
typedef vector<int> vi;
typedef vector<ll> vll;
const ll inf = 1e18;
const int mod = 1e9+7; //998244353;
const int maxn = 1e5+5;
const int Xg[4] = {1,0,-1,0}, Yg[4] = {0,1,0,-1};
ll modpw(ll a,ll e) {if(e==0)return 1;ll x=modpw(a*a%mod,e>>1);return e&1?x*a%mod:x;}
ll ans;
int del[maxn];
stack<pii>bir,iki;
vi rd,bl;
vector<pii> v;
ll f(){
ll sum = 0;
while(!iki.empty()) iki.pop();
while(!bir.empty()) bir.pop();
for(int i = 0;i < sz(v);i++){
if(v[i].ss==1 and !iki.empty()){
if(v[i].ff < iki.top().ff) sum += iki.top().ff-v[i].ff;
else sum += v[i].ff - iki.top().ff;
del[i]=del[iki.top().ss]=1;
iki.pop();
}
if(v[i].ss==2 and !bir.empty()){
if(v[i].ff < bir.top().ff) sum += bir.top().ff-v[i].ff;
else sum += v[i].ff-bir.top().ff;
del[i]=del[bir.top().ss]=1;
bir.pop();
}
if(del[i]==0){
if(v[i].ss==1) bir.push({v[i].ff,i});
else iki.push({v[i].ff,i});
}
}
if(sz(bl) > sz(rd)){
for(int i = 0;i < sz(v);i++){
if(del[i]) continue;
int jog=mod;
int pos=upper_bound(all(rd),v[i].ff)-rd.begin();
if(pos < sz(rd)) jog=(rd[pos]-v[i].ff);
pos--;
if(pos > 0) jog=min(jog,v[i].ff-rd[pos]);
sum+=jog;
}
}
else {
for(int i = 0;i < sz(v);i++){
if(del[i]) continue;
int jog = mod;
int pos = upper_bound(all(bl),v[i].ff)-bl.begin();
if(pos < sz(bl)) jog = (bl[pos] - v[i].ff);
pos--;
if(pos > 0) jog = min(jog,v[i].ff-bl[pos]);
sum+=jog;
}
}
return sum;
}
ll min_total_length(vi r, vi b) {
rd=r,bl=b;
for(auto i : r) v.pb({i,1});
for(auto i : b) v.pb({i,2});
sort(all(v));
ll ans = f();
memset(del,0,sizeof(del));
reverse(all(v));
ans = min(ans,f());
return ans;
}
