Aoj 2170

简单的并查集应用。
不过注意，我们平常用的路径压缩在这里就不能用了，因为我们并不更新路上的所有结点到同一个并查集中去，这里只是做查询的用途。
题目中当mark一个点时，我们就用fa[x]=x去更新某个点，使它作为一个并查集的根节点，然后如果要查询离x最近的mark点，那么我们就逐渐网上找，找到第一个fa[x]=x的点，然后返回它的值，注意，这过程中我们不能进行路径压缩。

#include<stdio.h>
#include<iostream>
#include<string>
#include<string.h>
#include<algorithm>
#include<iomanip>
#include<vector>
#include<time.h>
#include<queue>
#include<stack>
#include<iterator>
#include<math.h>
#include<stdlib.h>
#include<limits.h>
#include<map>
#include<set>
#include<bitset>
//#define ONLINE_JUDGE
#define eps 1e-5
#define INF 0x7fffffff
#define FOR(i,a) for((i)=0;i<(a);(i)++)
#define MEM(a) (memset((a),0,sizeof(a)))
#define sfs(a) scanf("%s",a)
#define sf(a) scanf("%d",&a)
#define sfI(a) scanf("%I64d",&a)
#define pf(a) printf("%d\n",a)
#define pfI(a) printf("%I64d\n",a)
#define pfs(a) printf("%s\n",a)
#define sfd(a,b) scanf("%d%d",&a,&b)
#define sft(a,b,num) scanf("%d%d%d",&a,&b,&num)
#define for1(i,a,b) for(int i=(a);i<b;i++)
#define for2(i,a,b) for(int i=(a);i<=b;i++)
#define for3(i,a,b)for(int i=(b);i>=a;i--)
#define MEM1(a) memset(a,0,sizeof(a))
#define MEM2(a) memset(a,-1,sizeof(a))
#define ll long long
const double PI=acos(-1.0);
template<class T> T gcd(T a,T b){return b?gcd(b,a%b):a;}
template<class T> T lcm(T a,T b){return a/gcd(a,b)*b;}
template<class T> inline T Min(T a,T b){return a<b?a:b;}
template<class T> inline T Max(T a,T b){return a>b?a:b;}
using namespace std;
//#pragma comment(linker,"/STACK:1024000000,1024000000")
int n,m,d;
//#define N 200005
#define M 100010
#define Mod 1000000000
#define p(x,y) make_pair(x,y)
const int MAX_len=550;
int fa[100005];
int find(int x){
    return x==fa[x]?fa[x]:find(fa[x]);
}  //不能写成x==fa[x]?fa[x]:fa[x]=find(fa[x])，即路径不能压缩
int main(){
#ifndef ONLINE_JUDGE
    freopen("in.txt", "r", stdin);
//  freopen("out.txt", "w", stdout);
#endif
    while(sfd(n,m)!=EOF && n+m){
        int x;
        for(int i=2;i<=n;i++){
            sf(fa[i]);
        }
        fa[1]=1;
        ll ans=0;
        char op[5];
        for(int i=0;i<m;i++){
            scanf("%s%d",op,&x);
            if(op[0] == 'Q'){
                ans += (ll)find(x);
            }else
                fa[x] = x;
        }
        printf("%lld\n",ans);
    }
    return 0;
}