#include <cstdio>
#include <cstring>
#include <iostream>
#include <algorithm>
using namespace std;
const int maxn=100010;
int n,m,Q,cnt,np,nq,now;
int to[maxn<<1],next[maxn<<1],head[maxn],fa[20][maxn],Log[maxn],dep[maxn],siz[maxn],p1[maxn],p2[maxn];
int s[maxn],tim[maxn],op[maxn],ans[maxn];
struct point
{
	int x,y,k,org;
	point() {}
	point(int a,int b,int c,int d) {x=a,y=b,k=c,org=d;}
}p[maxn];
struct QUERY
{
	int l,r,x,k,org;
	QUERY() {}
	QUERY(int a,int b,int c,int d,int e) {l=a,r=b,x=c,k=d,org=e;}
}q[maxn<<1];
inline void add(int a,int b)
{
	to[cnt]=b,next[cnt]=head[a],head[a]=cnt++;
}
void dfs(int x)
{
	siz[x]=1,p1[x]=++p2[0];
	for(int i=head[x];i!=-1;i=next[i])	if(to[i]!=fa[0][x])
		fa[0][to[i]]=x,dep[to[i]]=dep[x]+1,dfs(to[i]),siz[x]+=siz[to[i]];
	p2[x]=p2[0];
}
inline int FA(int x,int y)
{
	for(int i=Log[y];i>=0;i--)	if(y>=(1<<i))	y-=(1<<i),x=fa[i][x];
	return x;
}
bool cmpx(const point &a,const point &b)
{
	return a.x<b.x;
}
bool cmqx(const QUERY &a,const QUERY &b)
{
	return a.x<b.x;
}
inline void updata(int x,int v)
{
	for(int i=x;i<=n;i+=i&-i)
	{
		if(tim[i]<now)	tim[i]=now,s[i]=0;
		s[i]+=v;
	}
}
inline int query(int x)
{
	int ret=0,i;
	for(i=x;i;i-=i&-i)
	{
		if(tim[i]<now)	tim[i]=now,s[i]=0;
		ret+=s[i];
	}
	return ret;
}
void solve(int l,int r,int L,int R)
{
	if(l==r)
	{
		for(int i=L;i<=R;i++)	if(p[l].org<q[i].org&&p[l].x<=q[i].x&&p[l].y>=q[i].l&&p[l].y<=q[i].r)
			ans[q[i].org]+=p[l].k*q[i].k;
		return ;
	}
	if(L>R)	return ;
	int mid=(l+r)>>1,MID,i,j;
	for(i=L;i<=R;i++)	if(q[i].org>p[mid].org)	break;
	MID=i-1;
	solve(l,mid,L,MID),solve(mid+1,r,MID+1,R);
	sort(p+l,p+mid+1,cmpx),sort(q+MID+1,q+R+1,cmqx);
	now++;
	for(i=MID+1,j=l;i<=R;i++)
	{
		for(;j<=mid&&p[j].x<=q[i].x;j++)	updata(p[j].y,p[j].k);
		ans[q[i].org]+=(query(q[i].r)-query(q[i].l-1))*q[i].k;
	}
}
inline int rd()
{
	int ret=0,f=1;	char gc=getchar();
	while(gc<‘0‘||gc>‘9‘)	{if(gc==‘-‘)	f=-f;	gc=getchar();}
	while(gc>=‘0‘&&gc<=‘9‘)	ret=ret*10+(gc^‘0‘),gc=getchar();
	return ret*f;
}
int main()
{
	n=rd();
	int i,j,a,b,c;
	memset(head,-1,sizeof(head));
	for(i=1;i<n;i++)	a=rd(),b=rd(),add(a,b),add(b,a);
	dfs(1);
	for(i=2;i<=n;i++)	Log[i]=Log[i>>1]+1;
	for(j=1;(1<<j)<=n;j++)	for(i=1;i<=n;i++)	fa[j][i]=fa[j-1][fa[j-1][i]];
	m=rd();
	for(i=1;i<=m;i++)
	{
		a=rd(),b=rd();
		if(p1[a]>p1[b])	swap(a,b);
		p[++np]=point(p1[a],p1[b],1,0);
	}
	Q=rd();
	for(i=1;i<=Q;i++)
	{
		op[i]=rd(),a=rd(),b=rd();
		if(p1[a]>p1[b])	swap(a,b);
		if(op[i]==1)	p[++np]=point(p1[a],p1[b],1,i);
		if(op[i]==2)	p[++np]=point(p1[a],p1[b],-1,i);
		if(op[i]==3)
		{
			if(p1[b]<=p2[a])
			{
				c=FA(b,dep[b]-dep[a]-1);
				q[++nq]=QUERY(p1[b],p2[b],p1[c]-1,1,i);
				q[++nq]=QUERY(p2[c]+1,n,p1[b]-1,-1,i),q[++nq]=QUERY(p2[c]+1,n,p2[b],1,i);
			}
			else	q[++nq]=QUERY(p1[b],p2[b],p1[a]-1,-1,i),q[++nq]=QUERY(p1[b],p2[b],p2[a],1,i);
		}
	}
	solve(1,np,1,nq);
	for(i=1;i<=Q;i++)	if(op[i]==3)	printf("%d\n",ans[i]);
	return 0;
}