你决定设计你自己的软件包管理器。不可避免地，你要解决软件包之间的依赖问题。如果软件包A依赖软件包B，那么安装软件包A以前，必须先安装软 件包B。同时，如果想要卸载软件包B，则必须卸载软件包A。现在你已经获得了所有的软件包之间的依赖关系。而且，由于你之前的工作，除0号软件包以外，在 你的管理器当中的软件包都会依赖一个且仅一个软件包，而0号软件包不依赖任何一个软件包。依赖关系不存在环（若有m(m≥2)个软件包 A1,A2,A3,…,Am，其中A1依赖A2，A2依赖A3，A3依赖A4，……，Am−1依赖Am，而Am依赖A1，则称这m个软件包的依赖关系构成 环），当然也不会有一个软件包依赖自己。

现在你要为你的软件包管理器写一个依赖解决程序。根据反馈，用户希望在安装和卸载某个软件包时，快速地知道这个操作实际上会改变多少个软件包的 安装状态（即安装操作会安装多少个未安装的软件包，或卸载操作会卸载多少个已安装的软件包），你的任务就是实现这个部分。注意，安装一个已安装的软件包， 或卸载一个未安装的软件包，都不会改变任何软件包的安装状态，即在此情况下，改变安装状态的软件包数为0。

随后一行包含n−1个整数，相邻整数之间用单个空格隔开，分别表示1,2,3,…,n−2,n−1号软件包依赖的软件包的编号。

接下来一行包含1个正整数q，表示询问的总数。

之后q行，每行1个询问。询问分为两种：

installx：表示安装软件包x

uninstallx：表示卸载软件包x

你需要维护每个软件包的安装状态，一开始所有的软件包都处于未安装状态。对于每个操作，你需要输出这步操作会改变多少个软件包的安装状态，随后应用这个操作（即改变你维护的安装状态）。

输出文件的第i行输出1个整数，为第i步操作中改变安装状态的软件包数。

 //It is made by Awson on 2017.10.13

 #include <set>

 #include <map>

 #include <cmath>

 #include <ctime>

 #include <stack>

 #include <queue>

 #include <string>

 #include <cstdio>

 #include <vector>

 #include <cstring>

 #include <cstdlib>

 #include <iostream>

 #include <algorithm>

 #define LL long long

 #define Min(a, b) ((a) < (b) ? (a) : (b))

 #define Max(a, b) ((a) > (b) ? (a) : (b))

 #define Lr(r) (r<<1)

 #define Rr(r) (r<<1|1)

 using namespace std;

 const int N = 1e5;

 char ch[];

 int n, u;

 struct tt {

   int to, next;

 }edge[N+];

 int path[N+], TOP;

 int size[N+], son[N+], fa[N+], dep[N+];

 int pos[N+], top[N+], tot;

 int sgm[(N<<)+], lazy[(N<<)+];

 void add(int u, int v) {

   edge[++TOP].to = v;

   edge[TOP].next = path[u];

   path[u]= TOP;

 }

 void dfs1(int u, int depth, int father) {

   dep[u] = depth, size[u] = , son[u] = N+, fa[u] = father;

   for (int i = path[u]; i; i = edge[i].next) {

     dfs1(edge[i].to, depth+, u);

     size[u] += size[edge[i].to];

     if (size[edge[i].to] > size[son[u]]) son[u] = edge[i].to;

   }

 }

 void dfs2(int u, int tp) {

   top[u] = tp, pos[u] = ++tot;

   if (son[u] != N+) dfs2(son[u], tp);

   for (int i = path[u]; i; i = edge[i].next)

     if (edge[i].to != son[u])

       dfs2(edge[i].to, edge[i].to);

 }

 void pushdown(int o, int l, int r) {

   if (lazy[o] == ) {

     int mid = (l+r)>>;

     sgm[Lr(o)] = mid-l+;

     mid++;

     sgm[Rr(o)] = r-mid+;

     lazy[Lr(o)] = lazy[Rr(o)] = ;

     lazy[o] = ;

   }else if (lazy[o] == -) {

     sgm[Lr(o)] = sgm[Rr(o)] = ;

     lazy[Lr(o)] = lazy[Rr(o)] = -;

     lazy[o] = ;

   }

 }

 void update(int o, int l, int r, int a, int b, int key) {

   if (a <= l && r <= b) {

     lazy[o] = key;

     if (key == ) sgm[o] = r-l+;

     else sgm[o] = ;

     return;

   }

   pushdown(o, l, r);

   int mid = (l+r)>>;

   if (mid >= a) update(Lr(o), l, mid, a, b, key);

   if (mid < b) update(Rr(o), mid+, r, a, b, key);

   sgm[o] = sgm[Lr(o)]+sgm[Rr(o)];

 }

 int query(int o, int l, int r, int a, int b) {

   if (a <= l && r <= b) return sgm[o];

   pushdown(o, l, r);

   int mid = (l+r)>>;

   int ans = ;

   if (mid >= a) ans += query(Lr(o), l, mid, a, b);

   if (mid < b) ans += query(Rr(o), mid+, r, a, b);

   return ans;

 }

 int lca(int u, int v) {

   int sum = , ans = ;

   while (top[u] != top[v]) {

     if (dep[top[u]] < dep[top[v]]) swap(u, v);

     sum += pos[u]-pos[top[u]]+;

     ans += query(, , n, pos[top[u]], pos[u]);

     update(, , n, pos[top[u]], pos[u], );

     u = fa[top[u]];

   }

   if (dep[u] < dep[v]) swap(u, v);

   sum += pos[u]-pos[v]+;

   ans += query(, , n, pos[v], pos[u]);

   update(, , n, pos[v], pos[u], );

   return sum-ans;

 }

 void work() {

   scanf("%d", &n);

   for (int i = ; i < n; i++) {

     scanf("%d", &u);

     add(u, i);

   }

   dfs1(, , );

   dfs2(, );

   int q; scanf("%d", &q);

   while(q--) {

     scanf("%s%d", ch, &u);

     if (ch[] == 'u') {

       printf("%d\n",query(, , n, pos[u], pos[u]+size[u]-));

       update(, , n, pos[u], pos[u]+size[u]-, -);

     }else printf("%d\n", lca(, u));

   }

 }

 int main() {

   work();

   return ;

 }