#include<bits/stdc++.h>
#define ll long long
#define gc (p1 == p2 && (p2 = (p1 = buf) + fread(buf, 1, 65536, stdin), p1 == p2) ? EOF : *p1 ++)
#define getchar() p1 == p2 && (p2 = (p1 = buf) + fread(buf, 1, 1000000, stdin), p1 == p2) ? EOF : *p1++
#define putchar(x) (p3 - obuf < 1000000) ? (*p3++ = x) : (fwrite(obuf, p3 - obuf, 1, stdout), p3 = obuf, *p3++ = x)
using namespace std;
static char buf[29999999], *p1 = buf, *p2 = buf, obuf[29999999], *p3 = obuf;
template <typename item>
inline void read (register item &x) {
    x = 0;
	register char c = getchar();
    while (c < '0' || c > '9') c = getchar();
    while (c >= '0' && c <= '9') x = (x << 3) + (x << 1) + (c ^ 48), c = getchar();
}
static char cc[15];
template <typename item>
inline void print (register item x) {
	register int len = 0;
	do cc[len++] = x % 10 + '0', x /= 10; while (x);
	while (len--) putchar(cc[len]);
}
int N,M,Q,Log[700005],A[700005],in[700005],out[700005],tot1,lef[700005],q[700005],tail;
int mn[20][700005],mx[20][700005];
int getmin(int l,int r){
	int len=Log[r-l+1];
	return min(mn[len][l],mn[len][r-(1<<len)+1]);
}
int getmax(int l,int r){
	int len=Log[r-l+1];
	return max(mx[len][l],mx[len][r-(1<<len)+1]);
}
int getpos1(int l,int r,int v){
	if(getmin(l,r)>v)return 0;
	int pl=l,pr=r,ans=0;
	while(pl<=pr){
		int mid=pl+pr>>1;
		if(getmin(l,mid)<=v)ans=mid,pr=mid-1;
		else pl=mid+1;
	} return ans;
}
int getpos2(int l,int r,int v){
	if(getmax(l,r)<v)return 0;
	int pl=l,pr=r,ans=0;
	while(pl<=pr){
		int mid=pl+pr>>1;
		if(getmax(l,mid)>=v)ans=mid,pr=mid-1;
		else pl=mid+1;
	} return ans;
}
vector<int>road[700005];
void dfs(int u,int fa){
	in[u]=out[u]=++tot1;
	for(int v:road[u]){
		if(v==fa)continue;
		dfs(v,u);out[u]=out[v];
	}
}
int rt[700005],tot,son[20000005][2],cnt[20000005];
void ins(int &p,int q,int l,int r,int pos){
	p=++tot;son[p][0]=son[q][0],son[p][1]=son[q][1],cnt[p]=cnt[q]+1;
	if(l==r)return;int mid=l+r>>1;
	if(pos<=mid)ins(son[p][0],son[q][0],l,mid,pos);
	else ins(son[p][1],son[q][1],mid+1,r,pos);
}
int query(int p,int q,int l,int r,int a,int b){
	if(a<=l&&r<=b)return cnt[p]-cnt[q];int mid=l+r>>1,res=0;
	if(a<=mid)res+=query(son[p][0],son[q][0],l,mid,a,b);
	if(b>mid)res+=query(son[p][1],son[q][1],mid+1,r,a,b);
	return res;
}
int tot2,L[7000005],R[7000005];
int main(){
	read(N),read(M),read(Q);
    for(int i=1;i<N;++i){
    	int u,v;read(u),read(v);
    	road[u].push_back(v);road[v].push_back(u);
	} dfs(1,-1);
	for(int i=2;i<=M;++i)Log[i]=Log[i>>1]+1;
	for(int i=1;i<=M;++i){
		read(A[i]);
		while(tail&&in[A[q[tail]]]>=in[A[i]])--tail;
		lef[i]=q[tail];q[++tail]=i;
	}tail=0;
	for(int i=1;i<=M;++i){
		while(tail&&out[A[q[tail]]]<=out[A[i]])--tail;
		lef[i]=max(lef[i],q[tail]);q[++tail]=i;++lef[i];
	}
	for(int i=1;i<=M;++i)ins(rt[i],rt[i-1],1,M,lef[i]),mn[0][i]=in[A[i]],mx[0][i]=out[A[i]];
	for(int j=1;(1<<j)<=M;++j)for(int i=1;i+(1<<j)-1<=M;++i)mn[j][i]=min(mn[j-1][i],mn[j-1][i+(1<<j-1)]),mx[j][i]=max(mx[j-1][i],mx[j-1][i+(1<<j-1)]);
	while(Q--){
		read(tot2);
		for(int i=1;i<=tot2;++i)read(L[i]),read(R[i]);
		int Mn=0,Mx=0;ll res=0;
		for(int i=1;i<=tot2;++i){
			if(i==1){
				res+=1ll*query(rt[R[i]],rt[L[i]-1],1,M,1,L[i]);
				Mn=getmin(L[i],R[i]);Mx=getmax(L[i],R[i]);
				continue;
			}
			int pos1=getpos1(L[i],R[i],Mn);
			int pos2=getpos2(L[i],R[i],Mx);
			if(!pos1||!pos2){
				Mn=min(Mn,getmin(L[i],R[i]));
				Mx=max(Mx,getmax(L[i],R[i]));
				continue;
			} pos1=max(pos1,pos2);
			res+=1ll*query(rt[R[i]],rt[pos1-1],1,M,1,L[i]);
			Mn=min(Mn,getmin(L[i],R[i])),Mx=max(Mx,getmax(L[i],R[i]));
		} print(res); putchar('\n');
	} fwrite(obuf,p3-obuf,1,stdout);
	return 0;
}