P3823_[NOI2017]蚯蚓排队 哈希+脑子

之前就写过一遍，今天却写挂了，查了半天发现是数组名写错啦$qwq$

---

观察到$K$很小，所以使得我们可以哈希（怎么什么都能哈希$qwq$）。我们把长度小于等于$50$的子串扔到哈希表里，并统计出现次数，注意每次合并和分离时，只加入或删除与断开点距离小于等于$50$的；因为其他子串长度太长，或是已经在前几次中被添加在哈希表里了。

#include<cstdio>
#include<iostream>
#include<algorithm>
#include<cstring>
#include<cmath>
#include<cctype>
#include<cstdlib>
#include<vector>
#include<queue>
#include<map>
#include<set>
#define ll long long
#define ull unsigned long long
#define R register int
using namespace std;
namespace Fread {
    //static char B[1<<15],*S=B,*D=B;
    //#define getchar() (S==D&&(D=(S=B)+fread(B,1,1<<15,stdin),S==D)?EOF:*S++)
    inline int g() {
        R ret=,fix=; register char ch; while(!isdigit(ch=getchar())) fix=ch=='-'?-:fix;
        do ret=ret*+(ch^); while(isdigit(ch=getchar())); return ret*fix;
    }
}using Fread::g;
const int N=,K=,mod=,M=,B=,S=;
int n,m,q,a[N],pre[N],nxt[N],cnt[N],s[(K<<)+];
ull t[S],p[K<<];
namespace HASH {
    struct node { ull vl; int cnt,nxt; node(){}
        node(ull v,int c,int n)    {vl=v,cnt=c,nxt=n;}
    }h[]; int fir[M],cnt=;
    inline void add(ull x,int d) {
        R st=x%M; for(R i=fir[st];i;i=h[i].nxt) if(h[i].vl==x){
            h[i].cnt+=d; return ;
        } h[++cnt]=node(x,d,fir[st]),fir[st]=cnt;
    }
    inline int query(ull x) {
        R st=x%M; for(R i=fir[st];i;i=h[i].nxt)
            if(h[i].vl==x) return h[i].cnt; return ;
    }
    inline void merge() {
        R x=g(),y=g(); memset(s,,sizeof(s)); R l=K,r=l-;
        for(R i=x;i&&l>;i=pre[i]) s[--l]=a[i];
        for(R i=y;i&&r+<(K<<);i=nxt[i]) s[++r]=a[i];
        for(R i=;i<=r;++i) t[i]=t[i-]*B+s[i];
        for(R i=l;i<K;++i) for(R j=K;j<=r;++j) add(t[j]-t[i-]*p[j-i+],);
        nxt[x]=y,pre[y]=x;
    }
    inline void div() {
        R x=g(),y=nxt[x]; memset(s,,sizeof(s)); R l=K,r=l-;
        for(R i=x;i&&l>;i=pre[i]) s[--l]=a[i];
        for(R i=y;i&&r+<(K<<);i=nxt[i]) s[++r]=a[i];
        for(R i=;i<=r;++i) t[i]=t[i-]*B+s[i];
        for(R i=l;i<K;++i) for(R j=K;j<=r;++j) add(t[j]-t[i-]*p[j-i+],-);
        nxt[x]=pre[y]=;
    }
}
char str[];
inline ll query() { register ull vl=;
    scanf("%s",str+); R k=g(),n=strlen(str+); register ll ans=;
    if(k==) for(R i=;str[i];++i) ans=(ans*cnt[str[i]-''])%mod;
    else { for(R i=;str[i];++i) t[i]=t[i-]*B+str[i]-'';
        for(R i=k;str[i];++i) ans=(ans*HASH::query(t[i]-t[i-k]*p[k]))%mod;
    } return ans;
}
signed main() {
#ifdef JACK
    freopen("NOIPAK++.in","r",stdin);
#endif
    n=g(),q=g(); p[]=; for(R i=;i<K;++i) p[i]=p[i-]*B;
    for(R i=;i<=n;++i) a[i]=g(),++cnt[a[i]];
    while(q--) {
        R k=g(); if(k==) HASH::merge();
        else if(k==) HASH::div();
        else printf("%lld\n",query());
    }
}