#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
#define rep(i,n) for (ll i=0;i<(n);++i)
const ll MOD=1e9+7;
//const ll MOD=998244353;

class EularTourForVertex{
    private:
    vector<int> ls,rs;
    int now;
    void dfs(int v,int p){
        ls[v]=now++;
        for (int u:G[v]) if (u!=p) dfs(u,v);
        rs[v]=now;
    }
    public:
    vector<vector<int>> G;
    EularTourForVertex(int n):ls(n),rs(n),G(n){}
    void add_edge(int u,int v){
        G[u].emplace_back(v);
        G[v].emplace_back(u);
    }
    void build(int r=0){
        now=0; dfs(r,-1);
    }
    int idx(int v){return ls[v];}
    template<typename F>
    void exec(int v,F f){
        f(ls[v],rs[v]);
    }
};

template<typename Monoid,typename OperatorMonoid>
struct LazySegmentTree{
    typedef function<Monoid(Monoid,Monoid)> F;
    typedef function<Monoid(Monoid,OperatorMonoid)> G;
    typedef function<OperatorMonoid(OperatorMonoid,OperatorMonoid)> H;
    int n,hi;
    F f;
    G g;
    H h;
    Monoid id0;
    OperatorMonoid id1;
    vector<Monoid> dat;
    vector<OperatorMonoid> laz;
    LazySegmentTree(int n_,F f,G g,H h,Monoid id0,OperatorMonoid id1):
                    f(f),g(g),h(h),id0(id0),id1(id1){init(n_);}
    void init(int n_){
        n=1,hi=0;
        while(n<n_) n<<=1,++hi;
        dat.assign(n<<1,id0);
        laz.assign(n<<1,id1);
    }
    void build(const vector<Monoid> &v){
        for (int i=0;i<v.size();++i) dat[i+n]=v[i];
        for (int i=n-1;i;--i) dat[i]=f(dat[i<<1|0],dat[i<<1|1]);
    }
    inline Monoid reflect(int k){
        return laz[k]==id1?dat[k]:g(dat[k],laz[k]);
    }
    inline void propagate(int k){
        if (laz[k]==id1) return;
        laz[k<<1|0]=h(laz[k<<1|0],laz[k]);
        laz[k<<1|1]=h(laz[k<<1|1],laz[k]);
        dat[k]=reflect(k);
        laz[k]=id1;
    }
    inline void thrust(int k){
        for (int i=hi;i;--i) propagate(k>>i);
    }
    inline void recalc(int k){
        while(k>>=1) dat[k]=f(reflect(k<<1|0),reflect(k<<1|1));
    }
    void update(int a,int b,OperatorMonoid x){
        thrust(a+=n),thrust(b+=n-1);
        for (int l=a,r=b+1;l<r;l>>=1,r>>=1){
            if (l&1) laz[l]=h(laz[l],x),++l;
            if (r&1) --r,laz[r]=h(laz[r],x);
        }
        recalc(a),recalc(b);
    }
    void set_val(int k,Monoid x){
        thrust(k+=n);
        dat[k]=x,laz[k]=id1;
        recalc(k);
    }
    Monoid query(int a,int b){
        if (a>=b) return id0;
        thrust(a+=n),thrust(b+=n-1);
        Monoid vl=id0,vr=id0;
        for (int l=a,r=b+1;l<r;l>>=1,r>>=1){
            if (l&1) vl=f(vl,reflect(l++));
            if (r&1) vr=f(reflect(--r),vr);
        }
        return f(vl,vr);
    }
    Monoid operator[](int i){
        return query(i,i+1);
    }
};

typedef pair<int,int> Pii;

int main(){
    cin.tie(0);
    ios::sync_with_stdio(false);
    int n,q; cin >> n >> q;
    EularTourForVertex ET(n);
    rep(i,n-1){
        int p; cin >> p; --p;
        ET.add_edge(i+1,p);
    }
    ET.build();
    vector<char> label(n);
    rep(i,n) cin >> label[i];
    auto f=[](Pii a,Pii b){return Pii(a.first+b.first,a.second+b.second);};
    auto g=[](Pii a,int b){return Pii(a.first,b?a.first-a.second:a.second);};
    auto h=[](int a,int b){return a^b;};
    LazySegmentTree<Pii,int> seg(n,f,g,h,{0,0},0);
    vector<Pii> v(n);
    rep(i,n) v[ET.idx(i)]={1,(label[i]=='G')};
    seg.build(v);
    auto F=[&](int l,int r){return seg.update(l,r,1);};
    rep(i,q){
        int v; cin >> v; --v;
        ET.exec(v,F);
        Pii p=seg.query(0,n);
        cout << (p.first-p.second<p.second?"broccoli":"cauliflower") << endl;
    }
}


Measured memory_bytes: 16324