树链剖分 对于删除操作,之前不会写子树修改的时候暴力写了dfs
最终发现原来只要将dfs序应用一下即可
#include <cstdio>
#include <cstring>
#include <iostream>
#include <algorithm>
using namespace std;
const int MAXN = 100000 + 5;
int sum[MAXN<<2],lazy[MAXN<<2];
int ec=0,fst[MAXN],to[MAXN<<1],next[MAXN<<1];
int dep[MAXN],siz[MAXN],son[MAXN],pos[MAXN],sz=0,top[MAXN],fa[MAXN],end[MAXN];
int n;
int in()
{
int c=getchar(),x=0;
while(c<'0'||c>'9')c=getchar();
while(c<='9'&&c>='0')
{
x=x*10+c-'0';
c=getchar();
}
return x;
}
inline void add(int u,int v)
{
to[++ec]=v;
next[ec]=fst[u];
fst[u]=ec;
}
void dfs1(int u,int f,int d)
{
dep[u]=d;siz[u]=1;son[u]=0;
for(int i=fst[u];i;i=next[i])
{
int v=to[i];
dfs1(v,u,d+1);
siz[u]+=siz[v];
if(siz[son[u]]<siz[v])son[u]=v;
}
}
void dfs2(int u,int tp)
{
pos[u]=++sz;
top[u]=tp;
if(son[u])dfs2(son[u],tp);
for(int i=fst[u];i;i=next[i])
{
int v=to[i];
if(v==son[u])continue;
dfs2(v,v);
}
end[u]=sz;
}
#define lc (o<<1)
#define rc (lc|1)
#define m ((l+r)>>1)
inline void up(int o,int l,int r)
{
if(l<r)sum[o]=sum[lc]+sum[rc];
if(lazy[o]!=-1)sum[o]=lazy[o]*(r-l+1);
}
inline void down(int o,int l,int r)
{
if(lazy[o]!=-1)
{
lazy[lc]=lazy[rc]=lazy[o];
lazy[o]=-1;
}
}
void update(int o,int l,int r,int cl,int cr,int cv)
{
/*
printf("c\n");
printf("o=%d,l=%d,r=%d,cl=%d,cr=%d,sum=%d,lazy=%d\n",o,l,r,cl,cr,sum[o],lazy[o]);
printf("c\n");
*/
if(cl<=l && r<=cr)lazy[o]=cv;
else
{
down(o,l,r);
if(cl<=m)update(lc,l,m,cl,cr,cv);else up(lc,l,m);
if(m+1<=cr)update(rc,m+1,r,cl,cr,cv);else up(rc,m+1,r);
}
up(o,l,r);
}
int query(int o,int l,int r,int ql,int qr)
{
/*
printf("q\n");
printf("o=%d,l=%d,r=%d,ql=%d,qr=%d,sum=%d,lazy=%d\n",o,l,r,ql,qr,sum[o],lazy[o]);
printf("q\n");
*/
if(lazy[o]!=-1)
{
if(!lazy[o])return 0;
int ll=max(l,ql);
int rr=min(qr,r);
return lazy[o]*(rr-ll+1);
}
else if(ql<=l && r<=qr)
{
return sum[o];//*(r-l+1);
}
else
{
int ans=0;
if(ql<=m)ans+=query(lc,l,m,ql,qr);
if(m+1<=qr)ans+=query(rc,m+1,r,ql,qr);
return ans;
}
}
int ins(int u)
{
int ans=0;
while(top[u]!=1)
{
int t=query(1,1,n,pos[top[u]],pos[u]);
//printf("top %d u %d t %d \n",top[u],u,t);
update(1,1,n,pos[top[u]],pos[u],1);
ans+=dep[u]-dep[top[u]]+1-t;
if(t>0)return ans;
u=fa[top[u]];
}
//if(u!=1)
//else
//{
//if(top[u]!=1){printf("error");exit(0);}
int t=query(1,1,n,pos[1],pos[u]);
//printf("top=%d u=%d t=%d pos=%d\n",top[u],u,t,pos[u]);
update(1,1,n,pos[top[u]],pos[u],1);
ans+=dep[u]-dep[top[u]]+1-t;
//}
return ans;
}
int del(int u)
{
int ans=query(1,1,n,pos[u],end[u]);
update(1,1,n,pos[u],end[u],0);
return ans;
}
/*
int dcnt=0;
void dfel(int u)
{
if(!query(1,1,n,pos[u],pos[u]))return;
dcnt++;
update(1,1,n,pos[u],pos[u],0);
for(int i=fst[u];i;i=next[i])
{
dfel(to[i]);
}
}
*/
int main()
{
memset(lazy,-1,sizeof(lazy));
n=in();
for(int i=2;i<=n;i++)
{
fa[i]=in();fa[i]++;
add(fa[i],i);
}
dfs1(1,0,0);
dfs2(1,1);
lazy[1]=0;
int q=in();
while(q--)
{
char buf[10];
scanf("%s",buf);
int x=in();x++;
if(buf[0]=='i')printf("%d\n",ins(x));
else printf("%d\n",del(x));
/*else
{
dcnt=0;
dfel(x);
printf("%d\n",dcnt);
}*/
}
return 0;
}