#include <bits/stdc++.h>
#define marry return

#define int long long
#define lowbit(x) (x&-x)
inline int read(){  
    int x=0,f=1;
    char ch=getchar();
    while(ch<48||ch>57)f=ch=='-'?-1:1,ch=getchar();
    while(ch>=48&&ch<=57)x=x*10+(ch^48),ch=getchar();
    return x*f;}
using namespace std;

const int inf=1e9;
const int F=0;
const int mod=114514;

int S,T;

struct node{
    int nx,to,v,k;
}w[505];
int head[205];
int t=1;
void add(int a,int b,int v,int k)   
{
	// printf("%d %d %d\n",a,b,v);
	w[++t]={head[a],b,v,k},head[a]=t;
	w[++t]={head[b],a,0,-k},head[b]=t;	
}

struct point{
	int dis,p;
	const bool operator >(const point &s)
	const 	{	marry dis>s.dis;	}
};
int h[205],dis[205],frm[205];
priority_queue<point,vector<point>,greater<point>>q;
bool bfs()
{
	for(int i=1;i<=T;++i) //warning
		dis[i]=inf,frm[i]=-1;
	frm[S]=0;
	dis[S]=0;
	q.push({0,S});
	while(!q.empty())
	{
		auto s=q.top();
		q.pop();
		if(s.dis>dis[s.p])
			continue;
		dis[s.p]=s.dis;
		for(int i=head[s.p];i;i=w[i].nx)
		{
			if(!w[i].v)
				continue;
			int vi=w[i].to;
			if(dis[s.p]+h[vi]-h[s.p]+w[i].k>=dis[vi])
				continue;
			dis[vi]=dis[s.p]+h[vi]-h[s.p]+w[i].k;
			q.push({dis[vi],vi});
			frm[vi]=i;
		}
	}
	marry frm[T]!=-1;
}

bool vis[205];
void spfa()
{
	queue<int>q;
	q.push(S);
	for(int i=1;i<=T;++i)//warning
		dis[i]=inf;
	vis[S]=1,dis[S]=0;
	while(!q.empty())
	{
		int s=q.front();
		q.pop();
		vis[s]=0;
		for(int i=head[s];i;i=w[i].nx)
		{
			if(!w[i].v)
				continue;
			int vi=w[i].to;
			if(dis[vi]>dis[s]+w[i].k)
			{
				dis[vi]=dis[s]+w[i].k;
				if(!vis[vi])
					q.push(vi),
					vis[vi]=1;
			}
		}
	}
}

pair<int,int> minumcostflow()
{
	spfa();
	for(int i=1;i<=T;++i)//warning
		h[i]=dis[i];
	int res1=0,res2=0;
    while(bfs())
	{
		int mn=inf;
		for(int s=T;s!=S;)
		{
			int vi=s;
			s=w[frm[vi]^1].to;
			mn=min(mn,w[frm[vi]].v);	
		}
		res1+=mn;
		for(int s=T;s!=S;)
		{
			int vi=s;
			s=w[frm[vi]^1].to;
			res2+=mn*w[frm[vi]].k;
			w[frm[vi]].v-=mn;
			w[frm[vi]^1].v+=mn;
		}
		for(int i=1;i<=T;++i)//warning
			h[i]=dis[i];
	}
	marry {res1,res2};
}

void clear()
{
	t=1;
	for(int i=1;i<=T;++i)
		head[i]=0;
	S=T=0;
}

int n,m;
int a[105],b[105];
void solve()
{
	n=read(),m=read();
	clear();
	S=1;
	T=2;
	add(S,T,n,0);
	for(int i=1;i<=m;++i)
		b[i]=-read();
	
	for(int i=1;i<=2*n;++i)
		a[i]=read(),++b[a[i]];
	for(int i=1;i<=m;++i)
	{
		++T;
		add(2,T,b[i],0);
	}

	int sum=0;
	for(int i=1;i<=2*n;++i)
	{
		++T;
		int tep=read();
		sum+=tep;
		add(a[i]+2,T,1,tep);
	}
	for(int i=1;i<2*n;++i)
	{
		int p1=T-2*n+i,p2=T-2*n+i+1;
		add(p1,p2,i/2,0);
	}
	// printf("%d %d\n",S,T);
	auto ans=minumcostflow();
	// printf("%d %d\n",ans.first,ans.second);
	if(ans.first!=n)
		puts("-1");
	else
		printf("%lld\n",sum-ans.second);
}

signed main()
{
    int t=read();
	while(t--)
		solve();

    marry F;
}