#include<iostream>
#include<cstdio>
#include<cstring>
#include<algorithm>
#include<stack>
using namespace std;
char zt[105];
char cz[105];
int a[105];
int res[105];
stack<int>cardl1;
stack<int>cardl2;
stack<int>cardr1;
stack<int>cardr2;int main()
{int N,n;int k=0;int r,l,t;int i,j;while(scanf("%d",&N)!=EOF){if(N==0)break;k++;scanf("%s",zt);scanf("%s",cz);scanf("%d",&n);for(i=0;i<n;i++){scanf("%d",&a[i]);}cout<<"Pile "<<k<<endl;cardl1.push(1);cardr1.push(N);r=N-1;l=0;for(i=0;i<N-1;i++){if(cz[i]=='R'){for(j=r;j<N;j++){if(zt[j]=='U')zt[j]='D';elsezt[j]='U';}r=r-1;if(i==N-2)break;if(cardr2.empty()){cardr2.push(r+1);while(!cardr1.empty()){t=cardr1.top();cardr1.pop();cardr2.push(t);}}else{cardr1.push(r+1);while(!cardr2.empty()){t=cardr2.top();cardr2.pop();cardr1.push(t);}}}else{for(j=l;j>=0;j--){if(zt[j]=='U')zt[j]='D';elsezt[j]='U';}l=l+1;if(i==N-2)break;if(cardl2.empty()){cardl2.push(l+1);while(!cardl1.empty()){t=cardl1.top();cardl1.pop();cardl2.push(t);}}else{cardl1.push(l+1);while(!cardl2.empty()){t=cardl2.top();cardl2.pop();cardl1.push(t);}}}}//cout<<zt<<endl;//while(!cardl2.empty())//{//   cout<<cardl2.top()<<endl;//    cardl2.pop();//}if(!cardl2.empty()){if(!cardr2.empty()){if(cz[N-2]=='R'){while(!cardr2.empty()){t=cardr2.top();cardr2.pop();cardl2.push(t);}for(i=0;!cardl2.empty();i++){res[i]=cardl2.top();cardl2.pop();}}else{while(!cardl2.empty()){t=cardl2.top();cardl2.pop();cardr2.push(t);}for(i=0;!cardr2.empty();i++){res[i]=cardr2.top();cardr2.pop();}}}else{if(cz[N-2]=='R'){while(!cardr1.empty()){t=cardr1.top();cardr1.pop();cardl2.push(t);}for(i=0;!cardl2.empty();i++){res[i]=cardl2.top();cardl2.pop();}}else{while(!cardl2.empty()){t=cardl2.top();cardl2.pop();cardr1.push(t);}for(i=0;!cardr1.empty();i++){res[i]=cardr1.top();cardr1.pop();}}}}else{if(!cardr2.empty()){if(cz[N-2]=='R'){while(!cardr2.empty()){t=cardr2.top();cardr2.pop();cardl1.push(t);}for(i=0;!cardl1.empty();i++){res[i]=cardl1.top();cardl1.pop();}}else{while(!cardl1.empty()){t=cardl1.top();cardl1.pop();cardr2.push(t);}for(i=0;!cardr2.empty();i++){res[i]=cardr2.top();cardr2.pop();}}}else{if(cz[N-2]=='R'){while(!cardr1.empty()){t=cardr1.top();cardr1.pop();cardl1.push(t);}for(i=0;!cardl1.empty();i++){res[i]=cardl1.top();cardl1.pop();}}else{while(!cardl1.empty()){t=cardl1.top();cardl1.pop();cardr1.push(t);}for(i=0;!cardr1.empty();i++){res[i]=cardr1.top();cardr1.pop();}}}}//for(i=0;i<N;i++)//{//   cout<<res[i]<<endl;//}for(i=0;i<n;i++){cout<<"Card "<<a[i]<<" is a face ";if(zt[res[a[i]-1]-1]=='U')cout<<"up ";elsecout<<"down ";cout<<res[a[i]-1]<<"."<<endl;}}return 0;
}