#include <bits/stdc++.h>
using namespace std;
#define endl '\n'
#ifndef ONLINE_JUDGE
#define show(a) cout<<""#a""<<" is "<<a<<endl;
#define shw(a,b)cout<<"-->"<<a<<" "<<b<<endl;
#define print(arr,xx)for(int i=0;i<xx;i++)cout<<arr[i]<<" \n"[i==xx-1];
#define here cout<<"here\n";
#define fastio ;
#else
#define show(a) ;
#define shw(a,b) ;
#define print(arr,xx) ;
#define here
#define fastio ios_base::sync_with_stdio(false);cin.tie(0);cout.tie(0);
#endif
int caseno=0;
#define print_case cout<<"Case "<<++caseno<<": ";
#define fout freopen("output.txt","w",stdout);
#define fin freopen("input.txt","r",stdin);
#define pb push_back
#define pi acos(-1.0)
typedef long long ll;
typedef pair<ll,ll> pll;
typedef vector<vector<int> > vii;
#define rep(i, begin, end) for (__typeof(end) i = (begin) - ((begin) > (end)); i != (end) - ((begin) > (end)); i += 1 - 2 * ((begin) > (end)))
void yesno(bool okk) {cout<<(okk?"YES":"NO")<<endl;}
const int primemod=1000000007;
#define max(a, b) ((a) > (b) ? (a) : (b))
#define min(a, b) ((a) < (b) ? (a) : (b))
const ll maxsize = 3*100000+9;
#define fi first
#define se second
#define inf 1<<30
const int N = 210;
ll n;
vector<vector<int>> adj;
int capacity[N][N];
int bfs(int s, int t, vector<int>&par){
fill(par.begin(), par.end(),-1);
par[s]=-2;
queue<pair<int,int>>q;
q.push({s,inf});
while(!q.empty()){
int cap = q.front().se;
int cur = q.front().fi;
q.pop();
for(auto next:adj[cur]){
if(par[next]==-1 and capacity[cur][next]>0){
par[next]=cur;
int flow = min(capacity[cur][next],cap);
if(next==t)return flow;
q.push({next,flow});
}
}
}
return 0;
}
int maxflow(int s,int t){
int flow = 0,cur_fl;
vector<int>par(2*n+3);
while(cur_fl=bfs(s,t,par)){
flow += cur_fl;
int cur=t;
while(cur!=s){
int prev = par[cur];
capacity[cur][prev]+=cur_fl;
capacity[prev][cur]-=cur_fl;
cur = prev;
}
}
return flow;
}
void solve(){
cin>>n;
for(int i=0;i<adj.size();i++)adj[i].clear();
adj.resize(2*n+2);
memset(capacity, 0, sizeof capacity);
for(int i=1;i<=n;i++){
int x;
cin>>x;
adj[i].pb(i+n);
capacity[i][i+n]+=x;
}
int m;
cin>>m;
while(m--){
int i, j, k;
cin>>i>>j>>k;
adj[i+n].pb(j);
capacity[i+n][j]+=k;
}
int b,d;
cin>>b>>d;
while(b--){
int i;
cin>>i;
adj[0].pb(i);
capacity[0][i] = inf;
}
while(d--){
int i;
cin>>i;
adj[i+n].pb(2*n+1);
capacity[i+n][2*n+1] = inf;
}
cout<<maxflow(0,2*n+1)<<endl;
}
int main(){
#ifndef ONLINE_JUDGE
fin
fout
#endif
///-----
fastio
int T;
T=1;
cin>>T;
while(T--){
// yesno(solve());
print_case
solve();
}
///-----
return 0 ;
}
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CiNkZWZpbmUgZW5kbCAnXG4nCiNpZm5kZWYgT05MSU5FX0pVREdFCiNkZWZpbmUgc2hvdyhhKSBjb3V0PDwiIiNhIiI8PCIgaXMgIjw8YTw8ZW5kbDsKI2RlZmluZSBzaHcoYSxiKWNvdXQ8PCItLT4iPDxhPDwiICI8PGI8PGVuZGw7CiNkZWZpbmUgcHJpbnQoYXJyLHh4KWZvcihpbnQgaT0wO2k8eHg7aSsrKWNvdXQ8PGFycltpXTw8IiBcbiJbaT09eHgtMV07CiNkZWZpbmUgaGVyZSBjb3V0PDwiaGVyZVxuIjsKI2RlZmluZSBmYXN0aW8gOwojZWxzZQojZGVmaW5lIHNob3coYSkgIDsKI2RlZmluZSBzaHcoYSxiKSA7CiNkZWZpbmUgcHJpbnQoYXJyLHh4KSA7CiNkZWZpbmUgaGVyZQojZGVmaW5lIGZhc3RpbyBpb3NfYmFzZTo6c3luY193aXRoX3N0ZGlvKGZhbHNlKTtjaW4udGllKDApO2NvdXQudGllKDApOwojZW5kaWYKaW50IGNhc2Vubz0wOwojZGVmaW5lIHByaW50X2Nhc2UgY291dDw8IkNhc2UgIjw8KytjYXNlbm88PCI6ICI7CiNkZWZpbmUgZm91dCBmcmVvcGVuKCJvdXRwdXQudHh0IiwidyIsc3Rkb3V0KTsKI2RlZmluZSBmaW4gZnJlb3BlbigiaW5wdXQudHh0IiwiciIsc3RkaW4pOwojZGVmaW5lIHBiIHB1c2hfYmFjawojZGVmaW5lIHBpIGFjb3MoLTEuMCkKdHlwZWRlZiBsb25nIGxvbmcgbGw7CnR5cGVkZWYgcGFpcjxsbCxsbD4gcGxsOwp0eXBlZGVmIHZlY3Rvcjx2ZWN0b3I8aW50PiA+IHZpaTsKI2RlZmluZSByZXAoaSwgYmVnaW4sIGVuZCkgZm9yIChfX3R5cGVvZihlbmQpIGkgPSAoYmVnaW4pIC0gKChiZWdpbikgPiAoZW5kKSk7IGkgIT0gKGVuZCkgLSAoKGJlZ2luKSA+IChlbmQpKTsgaSArPSAxIC0gMiAqICgoYmVnaW4pID4gKGVuZCkpKQp2b2lkIHllc25vKGJvb2wgb2trKSB7Y291dDw8KG9raz8iWUVTIjoiTk8iKTw8ZW5kbDt9CmNvbnN0IGludCBwcmltZW1vZD0xMDAwMDAwMDA3OwojZGVmaW5lIG1heChhLCBiKSAoKGEpID4gKGIpID8gKGEpIDogKGIpKQojZGVmaW5lIG1pbihhLCBiKSAoKGEpIDwgKGIpID8gKGEpIDogKGIpKQpjb25zdCBsbCBtYXhzaXplID0gMyoxMDAwMDArOTsgCiNkZWZpbmUgZmkgZmlyc3QKI2RlZmluZSBzZSBzZWNvbmQKI2RlZmluZSBpbmYgMTw8MzAKY29uc3QgaW50IE4gPSAyMTA7CmxsIG47CnZlY3Rvcjx2ZWN0b3I8aW50Pj4gYWRqOwppbnQgY2FwYWNpdHlbTl1bTl07CmludCBiZnMoaW50IHMsIGludCB0LCB2ZWN0b3I8aW50PiZwYXIpewogICAgZmlsbChwYXIuYmVnaW4oKSwgcGFyLmVuZCgpLC0xKTsKICAgIHBhcltzXT0tMjsKICAgIHF1ZXVlPHBhaXI8aW50LGludD4+cTsKICAgIHEucHVzaCh7cyxpbmZ9KTsKICAgIHdoaWxlKCFxLmVtcHR5KCkpewogICAgICAgIGludCBjYXAgPSBxLmZyb250KCkuc2U7CiAgICAgICAgaW50IGN1ciA9IHEuZnJvbnQoKS5maTsKICAgICAgICBxLnBvcCgpOwogICAgICAgIGZvcihhdXRvIG5leHQ6YWRqW2N1cl0pewogICAgICAgICAgICBpZihwYXJbbmV4dF09PS0xIGFuZCBjYXBhY2l0eVtjdXJdW25leHRdPjApewogICAgICAgICAgICAgICAgcGFyW25leHRdPWN1cjsKICAgICAgICAgICAgICAgIGludCBmbG93ID0gbWluKGNhcGFjaXR5W2N1cl1bbmV4dF0sY2FwKTsKICAgICAgICAgICAgICAgIGlmKG5leHQ9PXQpcmV0dXJuIGZsb3c7CiAgICAgICAgICAgICAgICBxLnB1c2goe25leHQsZmxvd30pOwogICAgICAgICAgICB9CiAgICAgICAgfQogICAgfQogICAgcmV0dXJuIDA7Cn0KaW50IG1heGZsb3coaW50IHMsaW50IHQpewogICAgaW50IGZsb3cgID0gMCxjdXJfZmw7CiAgICB2ZWN0b3I8aW50PnBhcigyKm4rMyk7CiAgICB3aGlsZShjdXJfZmw9YmZzKHMsdCxwYXIpKXsKICAgICAgICBmbG93ICs9IGN1cl9mbDsKICAgICAgICBpbnQgY3VyPXQ7CiAgICAgICAgd2hpbGUoY3VyIT1zKXsKICAgICAgICAgICAgaW50IHByZXYgPSBwYXJbY3VyXTsKICAgICAgICAgICAgY2FwYWNpdHlbY3VyXVtwcmV2XSs9Y3VyX2ZsOwogICAgICAgICAgICBjYXBhY2l0eVtwcmV2XVtjdXJdLT1jdXJfZmw7CiAgICAgICAgICAgIGN1ciA9IHByZXY7CiAgICAgICAgfQogICAgfQogICAgcmV0dXJuIGZsb3c7Cn0KIAp2b2lkIHNvbHZlKCl7CiAgICBjaW4+Pm47CiAgICBmb3IoaW50IGk9MDtpPGFkai5zaXplKCk7aSsrKWFkaltpXS5jbGVhcigpOwogICAgYWRqLnJlc2l6ZSgyKm4rMik7CiAgICBtZW1zZXQoY2FwYWNpdHksIDAsIHNpemVvZiBjYXBhY2l0eSk7CiAgICBmb3IoaW50IGk9MTtpPD1uO2krKyl7CiAgICAJaW50IHg7CiAgICAgICAgY2luPj54OwogICAgICAgIGFkaltpXS5wYihpK24pOwogICAgICAgIGNhcGFjaXR5W2ldW2krbl0rPXg7CiAgICB9CiAgICBpbnQgbTsKICAgIGNpbj4+bTsKICAgIHdoaWxlKG0tLSl7CiAgICAgICAgaW50IGksIGosIGs7CiAgICAgICAgY2luPj5pPj5qPj5rOwogICAgICAgIGFkaltpK25dLnBiKGopOwogICAgICAgIGNhcGFjaXR5W2krbl1bal0rPWs7CiAgICB9CiAgICBpbnQgYixkOwogICAgY2luPj5iPj5kOwogICAgd2hpbGUoYi0tKXsKICAgICAgICBpbnQgaTsKICAgICAgICBjaW4+Pmk7CiAgICAgICAgYWRqWzBdLnBiKGkpOwogICAgICAgIGNhcGFjaXR5WzBdW2ldID0gaW5mOwogICAgfQogICAgd2hpbGUoZC0tKXsKICAgICAgICBpbnQgaTsKICAgICAgICBjaW4+Pmk7CiAgICAgICAgYWRqW2krbl0ucGIoMipuKzEpOwogICAgICAgIGNhcGFjaXR5W2krbl1bMipuKzFdID0gaW5mOwogICAgfQogICAgY291dDw8bWF4ZmxvdygwLDIqbisxKTw8ZW5kbDsKIAp9CmludCBtYWluKCl7CiAgICAjaWZuZGVmIE9OTElORV9KVURHRQogICAgZmluCiAgICBmb3V0CiAgICAjZW5kaWYgIAogICAgLy8vLS0tLS0KICAgICBmYXN0aW8KICAgICBpbnQgVDsKICAgICBUPTE7CiAgICAgY2luPj5UOwogICAgd2hpbGUoVC0tKXsKICAgICAgICAvLyB5ZXNubyhzb2x2ZSgpKTsKICAgICAgICBwcmludF9jYXNlCiAgICAgICAgc29sdmUoKTsKICAgIH0KICAgIC8vLy0tLS0tCiAgICAgcmV0dXJuIDAgOwogfQ==