[POI2009]SLO

Description

对于一个1-N的排列(ai)，每次你可以交换两个数ax与ay(x<>y)，代价为W(ax)+W(ay) 若干次交换的代价为每次交换的代价之和。请问将(ai)变为(bi)所需的最小代价是多少。

Input

第一行N。第二行N个数表示wi。第三行N个数表示ai。第四行N个数表示bi。 2<=n<=1000000 100<=wi<=6500 1<=ai,bi<=n ai各不相等，bi各不相等 (ai)<>(bi) 样例中依次交换数字(2,5)(3,4)(1,5)

Output

一个数，最小代价。

Sample Input

6

2400 2000 1200 2400 1600 4000

1 4 5 3 6 2

5 3 2 4 6 1

Sample Output

11200

---

每次找到一个置换群，要么是这个环里面最小的数一个个把他们换回去，要么是全局最小的数一个个把他们换回去，取min即可

/*program from Wolfycz*/
#include<cmath>
#include<cstdio>
#include<cstring>
#include<iostream>
#include<algorithm>
#define inf 0x7f7f7f7f
using namespace std;
typedef long long ll;
typedef unsigned int ui;
typedef unsigned long long ull;
inline int read(){
	int x=0,f=1;char ch=getchar();
	for (;ch<'0'||ch>'9';ch=getchar())	if (ch=='-')    f=-1;
	for (;ch>='0'&&ch<='9';ch=getchar())	x=(x<<1)+(x<<3)+ch-'0';
	return x*f;
}
inline void print(int x){
	if (x>=10)     print(x/10);
	putchar(x%10+'0');
}
const int N=1e6;
bool vis[N+10];
int A[N+10],B[N+10],C[N+10],val[N+10];
int Min,size;
ll tot;
void dfs(int x){
	size++;
	tot+=val[A[x]];
	Min=min(Min,val[A[x]]);
	vis[x]=1;
	if (vis[C[B[x]]])	return;
	dfs(C[B[x]]);
}
int main(){
	int n=read(),M=inf;
	ll Ans=0;
	for (int i=1;i<=n;i++)	val[i]=read(),M=min(M,val[i]);
	for (int i=1;i<=n;i++)	C[A[i]=read()]=i;
	for (int i=1;i<=n;i++)	B[i]=read();
	for (int i=1;i<=n;i++){
		Min=inf,tot=size=0;
		if (vis[i])	continue;
		dfs(i);
		Ans+=min(1ll*Min*(size-2)+tot,1ll*M*(size+1)+Min+tot);
	}
	printf("%lld\n",Ans);
	return 0;
}