#include
     
      #include
      
       #include
       
        #include
        
         using namespace std;#define maxn 100005#define inf 0x3f3f3f3fstruct Edge{
   int to,nxt,w;}e[maxn<<1];int head[maxn],tot,n,m,np,nc,s,t;void init(){    memset(head,-1,sizeof head);    tot=0;}void add(int u,int v,int w){    e[tot].to=v;e[tot].w=w;e[tot].nxt=head[u];head[u]=tot++;    e[tot].to=u;e[tot].w=0;e[tot].nxt=head[v];head[v]=tot++;}int d[maxn];int bfs(){    memset(d,0,sizeof d);    queue
         
          q;    q.push(s);d[s]=1;        while(q.size()){        int x=q.front();q.pop();        for(int i=head[x];i!=-1;i=e[i].nxt){            int y=e[i].to;            if(e[i].w==0 || d[y])continue;            d[y]=d[x]+1;            q.push(y);            if(y==t)return 1;        }    }    return 0;}int dfs(int x,int flow){    if(x==t)return flow;    int rest=flow;    for(int i=head[x];i!=-1 && rest; i=e[i].nxt){        int y=e[i].to;        if(d[y]!=d[x]+1 || e[i].w==0)continue;        int k=dfs(y,min(rest,e[i].w));        if(!k)d[y]=0;        rest-=k;e[i].w-=k;e[i^1].w+=k;    }    return flow-rest;}int dinic(){    int ans=0;    while(bfs())        while(int flow=dfs(s,inf))            ans+=flow;    return ans;}int main(){    while(cin>>n>>np>>nc>>m){        init();        s=0;t=n+1;        for(int i=1;i<=m;i++){            int u,v,w;            scanf("\n(%d,%d)%d",&u,&v,&w);            u++,v++;            add(u,v,w);        }                for(int i=1;i<=np;i++){            int u,w;            scanf("\n(%d)%d",&u,&w);            ++u;            add(s,u,w);        }        for(int i=1;i<=nc;i++){            int u,w;            scanf("\n(%d)%d",&u,&w);            ++u;            add(u,t,w);        }                cout<
          
           <<'\n'; }}