题解：
神题。。。我看到的时候直接吓懵了。。。
这是一道STL题。。。否则可能要写可持久化ETT或者可持久化Toptree？
用bitset来维护每个蘑菇上哪里有杂草，那么
对于操作1和操作2：可以预处理每个点为跟的bitset；
对于操作3和操作4：预处理两个点到根这条链上的bitset，先异或再或两个点的lca的bitset；
对于操作5和操作6：直接暴力区间清零即可；
询问直接贪心，由于随机所以复杂度O（玄学）（实际上应该是$O(\frac{n}{32}+\frac{n}{ln200})$？）
用STL的bitset会T掉一个点。。。所以我只能看着dalao们的手写bitset瑟瑟发抖（然而也并没有完全看懂）
代码：
#include<algorithm>
#include<iostream>
#include<cstring>
#include<cstdio>
#include<cmath>
#include<queue>
#include<map>
#define inf 2147483647
#define eps 1e-9
using namespace std;
typedef long long ll;
typedef unsigned int uint;
struct edge{
int v,next;
}a[];
int n,m,u,v,op,L,now,cnt=,tot=,lg[],dep[],head[],rts[],fa[][];
uint *bt[],s1[][],s2[][];
map<uint*,int>mp;
void New(int k){
bt[++cnt]=bt[k];
mp[bt[cnt]]++;
}
void clr(int l,int r){
if(r-l<){
for(int i=l;i<=r;i++){
bt[now][i>>]&=~((uint)<<(i&));
}
return;
}
int L=(l>>)+,R=(r>>)-;
for(int i=L;i<=R;i++)bt[now][i]=;
for(int i=l;(i>>)!=L;i++)bt[now][i>>]&=~((uint)<<(i&));
for(int i=r;(i>>)!=R;i--)bt[now][i>>]&=~((uint)<<(i&));
}
void rec(int k){
if(mp[bt[k]]>){
uint *bb=bt[k];
bt[k]=(uint*)malloc(L*sizeof(uint));
mp[bt[k]]++;
for(int i=;i<L;i++)bt[k][i]=bb[i];
mp[bt[k]]--;
}
}
void Or(uint a[],uint b[]){for(int i=;i<L;i++)a[i]|=b[i];}
void And(uint a[],uint b[]){for(int i=;i<L;i++)a[i]&=b[i];}
void Nand(uint a[],uint b[]){for(int i=;i<L;i++)a[i]&=~b[i];}
void AND(uint a[],uint b[],uint c[],int k){
uint t=a[k>>]>>(k&)&;
for(int i=;i<L;i++)a[i]&=b[i]^c[i];
a[k>>]|=t<<(k&);
}
void NAND(uint a[],uint b[],uint c[],int k){
for(int i=;i<L;i++)a[i]&=~(b[i]^c[i]);
a[k>>]&=~((uint)<<(k&));
}
void add(int u,int v){
a[++tot].v=v;
a[tot].next=head[u];
head[u]=tot;
}
void dfs(int u,int ff,int dpt){
dep[u]=dpt;
fa[u][]=ff;
for(int i=;i<=;i++)fa[u][i]=fa[fa[u][i-]][i-];
for(int i=;i<L;i++)s1[u][i]=s1[ff][i];
s1[u][u>>]^=(uint)<<(u&);
for(int tmp=head[u];tmp!=-;tmp=a[tmp].next){
int v=a[tmp].v;
if(v!=ff){
dfs(v,u,dpt+);
}
}
s2[u][u>>]^=(uint)<<(u&);
for(int i=;i<L;i++)s2[ff][i]|=s2[u][i];
}
int lca(int u,int v){
if(dep[u]<dep[v])swap(u,v);
int l=dep[u]-dep[v];
for(int i=;i>=;i--){
if((<<i)&l)u=fa[u][i];
}
if(u==v)return u;
for(int i=;i>=;i--){
if(fa[u][i]!=fa[v][i]){
u=fa[u][i],v=fa[v][i];
}
}
return fa[u][];
}
int query(int k){
int ans=;
for(int i=;i<=n;){
if(bt[now][i>>]>>(i&)){
uint t=(bt[now][i>>]>>(i&(uint)))<<(i&),tt=t&-t;
//printf("%lld %lld %lld\n",(ll)bt[now][i>>5],(ll)t,(ll)tt);
if(tt>)tt=lg[tt>>]+;
else tt=lg[tt];
ans++;
i=((i&(~(uint)))|tt)+k+;
}else i=((i>>)+)<<;
}
return ans;
}
int main(){
memset(head,-,sizeof(head));
scanf("%d",&n);
for(int i=;i<n;i++){
scanf("%d%d",&u,&v);
add(u,v);
add(v,u);
}
L=(n+)>>;
for(int i=;i<=;i++)lg[<<i]=i;
bt[]=(uint*)malloc(L*sizeof(uint));
bt[]=(uint*)malloc(L*sizeof(uint));
for(int i=;i<L;i++)bt[][i]=bt[][i]=;
for(int i=;i<=n;i++)bt[][i>>]|=(uint)<<(i&);
dfs(,,);
scanf("%d",&m);
for(int i=;i<=m;i++){
scanf("%d%d",&op,&now);
switch(op){
case :{New(now);break;}
case :{
scanf("%d",&u);
rec(now);
Or(bt[now],bt[u]);
break;
}
case :{
scanf("%d",&u);
rec(now);
Nand(bt[now],s2[u]);
break;
}
case :{
scanf("%d",&u);
rec(now);
And(bt[now],s2[u]);
break;
}
case :{
scanf("%d%d",&u,&v);
rec(now);
NAND(bt[now],s1[u],s1[v],lca(u,v));
break;
}
case :{
scanf("%d%d",&u,&v);
rec(now);
AND(bt[now],s1[u],s1[v],lca(u,v));
break;
}
case :{
scanf("%d%d",&u,&v);
rec(now);
clr(u,v);
break;
}
case :{
scanf("%d%d",&u,&v);
rec(now);
clr(,u-),clr(v+,n);
break;
}
case :{
scanf("%d",&u);
printf("%d\n",query(u));
break;
}
}
}
return ;
}