/*input
5 3
5 1 2 4 3
17
F 1
F 2
F 3
F 4
F 5
E 2 1
F 1
F 2
F 3
F 4
F 5
E 5 2
F 1
F 2
F 3
F 4
F 5
*/
#include<bits/stdc++.h>
#include <ext/pb_ds/assoc_container.hpp>
#include <ext/pb_ds/tree_policy.hpp>
using namespace std;
using namespace __gnu_pbds;
typedef tree<long long, null_type, less<long long>, rb_tree_tag, tree_order_statistics_node_update> indexed_set;
#pragma GCC optimize("unroll-loops,no-stack-protector")
//order_of_key #of elements less than x
// find_by_order kth element
using ll = long long;
using ld = long double;
using pii = pair<ll,ll>;
#define f first
#define s second
#define pb push_back
#define REP(i,n) for(int i=0;i<n;i++)
#define REP1(i,n) for(int i=1;i<=n;i++)
#define FILL(n,x) memset(n,x,sizeof(n))
#define ALL(_a) _a.begin(),_a.end()
#define sz(x) (int)x.size()
#define SORT_UNIQUE(c) (sort(c.begin(),c.end()), c.resize(distance(c.begin(),unique(c.begin(),c.end()))))
const ll INF64=4e18;
const int INF=0x3f3f3f3f;
const ll MOD=1e9+7;
const ld PI=acos(-1);
const ld eps=1e-6;
#define lowb(x) x&(-x)
#define MNTO(x,y) x=min(x,(__typeof__(x))y)
#define MXTO(x,y) x=max(x,(__typeof__(x))y)
ll sub(ll a,ll b){
ll x=a-b;
while(x<0) x+=MOD;
while(x>MOD) x-=MOD;
return x;
}
ll mult(ll a,ll b){
return (a*b)%MOD;
}
ll mypow(ll a,ll b){
if(b<=0) return 1;
ll res=1LL;
while(b){
if(b&1) res=(res*a)%MOD;
a=(a*a)%MOD;
b>>=1;
}
return res;
}
const int maxn=6e5+5;
const ll maxlg=__lg(maxn)+2;
struct segt{
int seg[4*maxn];
int n;
void resize(int _n){
n=_n;
}
void mdf(int idx,int l,int r,int p,int x){
if(r<p or l>p) return;
if(l==r){
seg[idx]=x;
return;
}
int mid=(l+r)/2;
mdf(idx*2,l,mid,p,x);
mdf(idx*2+1,mid+1,r,p,x);
seg[idx]=max(seg[idx*2],seg[idx*2+1]);
}
ll query(int idx,int l,int r,int ql,int qr){
if(l>qr or r<ql) return 0;
if(ql<=l and r<=qr) return seg[idx];
int mid=(l+r)/2;
return max(query(idx*2,l,mid,ql,qr),query(idx*2+1,mid+1,r,ql,qr));
}
ll query(int l,int r){
if(l>r) return 0;
return query(1,0,n-1,l,r);
}
void mdf(int p,int x){
mdf(1,0,n-1,p,x);
}
}arr;
int pos[maxn];
int main(){
ios::sync_with_stdio(false),cin.tie(0);
int n,a;
cin>>n>>a;
arr.resize(n+2);
arr.mdf(0,INF),arr.mdf(n+1,INF);
REP1(i,n){
int x;
cin>>x;
arr.mdf(i,x);
if(n-x<=10) pos[n-x]=i;
}
int q;
cin>>q;
while(q--){
char x;
int p;
cin>>x>>p;
if(x=='F'){
if(p==a){
cout<<"0\n";
}
else if(p<a){
int l=a,r=n+1;
while(l<r){
int mid=(l+r+1)/2;
if(arr.query(a+1,mid)>arr.query(p,a-1)) r=mid-1;
else l=mid;
}
cout<<(l-p)<<'\n';
}
else{
int l=0,r=a;
while(l<r){
int mid=(l+r)/2;
if(arr.query(mid,a-1)>arr.query(a+1,p)) l=mid+1;
else r=mid;
}
cout<<(p-l)<<'\n';
}
}
else{
int y;
cin>>y;
int ps=10;
REP(i,10){
if(pos[i]==p) ps=i;
}
arr.mdf(p,arr.query(pos[y-1],pos[y-1])+1);
while(ps>=y){
pos[ps]=pos[ps-1];
ps--;
}
pos[y-1]=p;
REP(i,y-1) arr.mdf(pos[i],arr.query(pos[i],pos[i])+1);
}
}
}
