[bzoj2120]数颜色

　　TAT

　　如果只维护画笔的颜色的话显然解决不了查询= =所以考虑维护别的东西。。

　　令pre[i]表示第pre[i]支画笔颜色同笔i相同且离得最近(pre[i]<i)。对于区间[l,r]中，如果某一支笔x的pre值<l，那么这支笔的颜色是当前区间里第一个出现的，答案+1.

　　然后我就脑残写了个线段树套treap。。。。。。

　　外层线段树表示区间，内层按pre值建treap。查询的时候在线段树上拆成一个个区间，然后在treap里查询一下pre值比l小的笔的数目。

　　因为修改时会改变pre值。。所以我再建了个treap'。。。。。。每种颜色一颗treap'，treap'里以笔所在位置为关键字。

　　所以每次修改某支画笔的颜色的时候，找出它原本的前驱后继改改改，再找出它颜色改变后的前驱后继改改改TAT。。

　　其实就是维护一下前驱。。每次修改最多改变三支画笔的前驱（自己，原本的后继，颜色改变后的后继）。

　　最后码了快5k。。。sxbk。。。其实正常做法不是分块暴力吗TAT

　　本来做好被分块艹的准备了。。结果O(nlog²n)竟然战胜了O(n^1.5)。。。感人肺腑

　　值得吐槽的是我已经连续若干次因为treap的更新写错而调了1h+了。。。。。。。。。。。

　　另。。全部加inline后就从#6爬到#2了= =..inline大法好代码长度哭了

#include<cstdio>
#include<iostream>
#include<cstring>
#include<algorithm>
using namespace std;
const int maxn=10023;
struct zs{
    int num,id;
}a[maxn<<1];
struct ask{
    int l,r;bool id;
}q[maxn];
int i,j,n,m,cnt;
int b[maxn],c[maxn<<1],pre[maxn],last[maxn<<1];
int l[maxn*18],r[maxn*18],rnd[maxn*18],sz[maxn*18],w[maxn*18],num[maxn*18],tot;
int rt[33233],size;
 
int ra;char rx;
inline int read(){
    rx=getchar(),ra=0;
    while(rx<'0'||rx>'9')rx=getchar();
    while(rx>='0'&&rx<='9')ra*=10,ra+=rx-48,rx=getchar();return ra;
}
 
inline void lturn(int &x,int R){
    r[x]=l[R],l[R]=x,sz[R]=sz[x],sz[x]=sz[l[x]]+w[x]+sz[r[x]],x=R;
}
inline void rturn(int &x,int L){
    l[x]=r[L],r[L]=x,sz[L]=sz[x],sz[x]=sz[l[x]]+w[x]+sz[r[x]],x=L;
}
inline void ins(int &x,int v){
    if(!x){x=++tot,rnd[x]=rand(),sz[x]=w[x]=1,num[x]=v;return;}
    ++sz[x];
    if(num[x]==v)w[x]++;else
    if(v<num[x]){
        ins(l[x],v);
        if(rnd[l[x]]<rnd[x])rturn(x,l[x]);
    }else{
        ins(r[x],v);
        if(rnd[r[x]]<rnd[x])lturn(x,r[x]);
    }
}
inline void del(int &x,int v){
    if(num[x]==v){
        if(w[x]>1)--w[x],--sz[x];else
        if(!(l[x]&&r[x]))x=l[x]|r[x];else
        if(rnd[l[x]]<rnd[r[x]])rturn(x,l[x]),del(x,v);
            else lturn(x,r[x]),del(x,v);
    }else if(v<num[x]) --sz[x],del(l[x],v);
    else --sz[x],del(r[x],v);
}
inline int get(int x,int v){
    if(!x)return 0;
    if(v<num[x])return get(l[x],v);else
    if(v==num[x])return sz[l[x]];else
    return get(r[x],v)+w[x]+sz[l[x]];
}
inline int query(int l,int r){
    if(l>r)swap(l,r);
    if(l==r)return 1;
    int l1=l;l+=size,r+=size;int sum=get(rt[l],l1)+get(rt[r],l1);
    for(;l^r^1;l>>=1,r>>=1){
        if(!(l&1))sum+=get(rt[l^1],l1);
        if(r&1)sum+=get(rt[r^1],l1);
    }
    return sum;
}
//---------------------------------------------------------------
 
int Tl[maxn<<1],Tr[maxn<<1],Trnd[maxn<<1],Tnum[maxn<<1],Trt[maxn<<1],Ttot;
int Tpre,Taft;
inline void Tlturn(int &x,int R){
    Tr[x]=Tl[R],Tl[R]=x,x=R;
}
inline void Trturn(int &x,int L){
    Tl[x]=Tr[L],Tr[L]=x,x=L;
}
inline void Tins(int &x,int v){
    if(!x){x=++Ttot,Trnd[x]=rand(),Tnum[x]=v;return;}
    if(v<Tnum[x]){
        Tins(Tl[x],v);
        if(Trnd[Tl[x]]<Trnd[x])Trturn(x,Tl[x]);
    }else{
        Tins(Tr[x],v);
        if(Trnd[Tr[x]]<Trnd[x])Tlturn(x,Tr[x]);
    }
}
inline void Tdel(int &x,int v){
    if(Tnum[x]==v){
        if(!(Tl[x]&&Tr[x]))x=Tl[x]|Tr[x];else
        if(Trnd[Tl[x]]<Trnd[Tr[x]])Trturn(x,Tl[x]),Tdel(x,v);
            else Tlturn(x,Tr[x]),Tdel(x,v);
    }else if(v<Tnum[x]) Tdel(Tl[x],v);
    else Tdel(Tr[x],v);
}
inline void getpre(int x,int v){
    if(!x)return;
    if(Tnum[x]<v)Tpre=Tnum[x],getpre(Tr[x],v);else
    getpre(Tl[x],v);
}
inline void getaft(int x,int v){
    if(!x)return;
    if(Tnum[x]>v)Taft=Tnum[x],getaft(Tl[x],v);else
    getaft(Tr[x],v);
}
 
bool cmp(zs a,zs b){return a.num<b.num;}
int main(){
    n=read(),m=read();char id;
    for(i=1;i<=n;i++)a[i].id=i,a[i].num=read();int n1=n;
    for(i=1;i<=m;i++){
        for(id=getchar();id<'A'||id>'Z';id=getchar());
        q[i].id=(id=='R');q[i].l=read(),q[i].r=read();
        if(q[i].id)a[++n1].id=i+n,a[n1].num=q[i].r;
    }
    sort(a+1,a+1+n1,cmp);cnt=0;
    for(i=1;i<=n1;i++){
        if(a[i].num!=a[i-1].num||i==1)c[++cnt]=a[i].num;
        if(a[i].id<=n)b[a[i].id]=cnt;else q[a[i].id-n].r=cnt;
    }
     
    for(size=1;size<n;size<<=1); size--;
    for(i=1;i<=n;i++){
        pre[i]=last[b[i]],last[b[i]]=i;
        for(j=i+size;j;j>>=1)ins(rt[j],pre[i]);
        Tins(Trt[b[i]],i);
    }
    for(i=1;i<=m;i++)
        if(!q[i].id)
            printf("%d
",query(q[i].l,q[i].r));
        else if(b[q[i].l]!=q[i].r){
            Tpre=0,getpre(Trt[b[q[i].l]],q[i].l),Taft=n+1,getaft(Trt[b[q[i].l]],q[i].l);
             
            if(Taft<=n){
                for(j=Taft+size;j;j>>=1)del(rt[j],pre[Taft]),ins(rt[j],Tpre);
                pre[Taft]=Tpre;
            }
                         
            Tpre=0,getpre(Trt[q[i].r],q[i].l),Taft=n+1,getaft(Trt[q[i].r],q[i].l);
            if(Taft<=n){
                for(j=Taft+size;j;j>>=1)del(rt[j],pre[Taft]),ins(rt[j],q[i].l);
                pre[Taft]=q[i].l;
            }
            for(j=q[i].l+size;j;j>>=1)del(rt[j],pre[q[i].l]),ins(rt[j],Tpre);
            pre[q[i].l]=Tpre,
             
            Tdel(Trt[b[q[i].l]],q[i].l),b[q[i].l]=q[i].r,Tins(Trt[b[q[i].l]],q[i].l);
        }
    return 0;
}