Splay_2维护序列 NOI2005

https://www.luogu.com.cn/problem/P2042
一道很好的Splay练习题

输入输出样例
输入 
9 8 
2 -6 3 5 1 -5 -3 6 3 
GET-SUM 5 4
MAX-SUM
INSERT 8 3 -5 7 2
DELETE 12 1
MAKE-SAME 3 3 2
REVERSE 3 6
GET-SUM 5 4
MAX-SUM
输出 
-1
10
1
10

从LG上借鉴了坑点，一个一个对照找bug

1.哨兵节点不要忘记加入,w[0]和w[n+1]都是-INF
2.每一次有splay操作或者rot操作，即旋转之后一定要push_up
3.push_down只要在查询的时候下穿懒标记就行了
4.垃圾回收
为了防止内存爆炸，我们将所有可能用到的内存存起来，丢弃的内存也放进垃圾回收站，以便之后使用

#include<iostream>
#include<cstdio>
#include<algorithm>
#include<cstring>
#include<functional>

using namespace std;

const int N = 6e5+10;
const int INF=1e9;

int n,m;

struct Node{
    int s[2],fa;
    int v,lmx,rmx,mx,sum,size;
    int rev,same;
    void init(int _v,int _fa){
        s[0]=s[1]=0,fa=_fa;
        rev=same=0;
        v=sum=mx=_v;
        lmx=rmx=max(0,v);
        size=1;
    }
}tr[N];
int root,node[N],tt=0;
int w[N];

void push_up(int x){
    auto &u=tr[x],&l=tr[u.s[0]],&r=tr[u.s[1]];
    u.size=l.size+r.size+1;
    u.sum=l.sum+r.sum+u.v;
    u.mx=max(max(l.mx,r.mx),l.rmx+r.lmx+u.v);
    u.lmx=max(l.lmx,l.sum+r.lmx+u.v);
    u.rmx=max(r.rmx,r.sum+l.rmx+u.v);
    // u.rev=u.same=0;
}

void push_down(int x){
    auto &u=tr[x],&l=tr[u.s[0]],&r=tr[u.s[1]];
    if(u.same){
        u.rev=u.same=0;
        if(u.s[0]) l.same=1,l.v=u.v,l.sum=l.size*l.v;
        if(u.s[1]) r.same=1,r.v=u.v,r.sum=r.size*r.v;
        if(u.v>0){
            if(u.s[0]) l.mx=l.lmx=l.rmx=l.sum;
            if(u.s[1]) r.mx=r.lmx=r.rmx=r.sum;
        }
        else{
            if(u.s[0]) l.mx=l.v,l.lmx=l.rmx=0;
            if(u.s[1]) r.mx=r.v,r.lmx=r.rmx=0;
        }
    }
    else if(u.rev){
        u.rev=0;
        l.rev^=1,r.rev^=1;
        swap(l.lmx,l.rmx),swap(r.lmx,r.rmx);
        swap(l.s[0],l.s[1]),swap(r.s[0],r.s[1]);
    }
}

void rot(int x){
    int y=tr[x].fa,z=tr[y].fa;
    int k=tr[y].s[1]==x;
    
    tr[z].s[tr[z].s[1]==y]=x,tr[x].fa=z;
    tr[y].s[k]=tr[x].s[k^1],tr[tr[x].s[k^1]].fa=y;
    tr[x].s[k^1]=y,tr[y].fa=x;
    push_up(y),push_up(x);
}

void splay(int x,int k){
    while(tr[x].fa!=k){
        int y=tr[x].fa,z=tr[y].fa;
        if(z!=k)
            (tr[z].s[1]==y)^(tr[y].s[1]==x)?rot(x):rot(y);
        rot(x);
    }
    if(!k) root=x;
}

int find_kth(int k){
    int u=root;
    while(u){
        push_down(u);
        if(tr[tr[u].s[0]].size>=k) u=tr[u].s[0];
        else if(tr[tr[u].s[0]].size+1==k) return u;
        else k-=tr[tr[u].s[0]].size+1,u=tr[u].s[1];
    }
}

int build(int l,int r,int fa){
    int mid=l+r>>1;
    int u=node[tt--];
    tr[u].init(w[mid],fa);
    if(l<mid) tr[u].s[0]=build(l,mid-1,u);
    if(r>mid) tr[u].s[1]=build(mid+1,r,u);
    push_up(u);  //update
    return u;
}

void dfs(int u){
    if(tr[u].s[0]) dfs(tr[u].s[0]);
    if(tr[u].s[1]) dfs(tr[u].s[1]);
    node[++tt]=u;
}

int main(){
    for(int i=1;i<N;i++) node[++tt]=i; //全部放入内存池
    
    scanf("%d%d",&n,&m);
    tr[0].mx=w[0]=w[n+1]=-INF;
    for(int i=1;i<=n;i++) scanf("%d",&w[i]);
    root=build(0,n+1,0);
    
    char op[20];
    while(m--){
        scanf("%s",op);
        if(op[2]=='S'){ //插入
            int posi,tot;
            scanf("%d%d",&posi,&tot);
            for(int i=0;i<tot;i++)
                scanf("%d",&w[i]);
            
            int L=find_kth(posi+1),R=find_kth(posi+2);
            splay(L,0),splay(R,L);
            int u=build(0,tot-1,R);
            tr[R].s[0]=u;
            push_up(R),push_up(L);
        }
        else if(op[2]=='L'){ //删除
            int posi,tot;
            scanf("%d%d",&posi,&tot);
            int L=find_kth(posi),R=find_kth(posi+tot+1);
            splay(L,0),splay(R,L);
            dfs(tr[R].s[0]); //递归删除并回收R的左子树
            tr[R].s[0]=0;
            push_up(R),push_up(L);
        }
        else if(op[2]=='K'){ //修改
            int posi,tot,c;
            scanf("%d%d%d",&posi,&tot,&c);
            int L=find_kth(posi),R=find_kth(posi+tot+1);
            splay(L,0),splay(R,L);
            
            auto &u=tr[tr[R].s[0]];
            u.same=1,u.v=c;
            u.sum=u.v*u.size;
            if(u.v>0)
                u.mx=u.lmx=u.rmx=u.sum;
            else
                u.mx=u.v,u.lmx=u.rmx=0;
            push_up(R),push_up(L);
        }
        else if(op[2]=='V'){  //翻转
            int posi,tot,c;
            scanf("%d%d%d",&posi,&tot,&c);
            int L=find_kth(posi),R=find_kth(posi+tot+1);
            splay(L,0),splay(R,L);
            
            auto &u=tr[tr[R].s[0]];
            u.rev^=1;
            swap(u.lmx,u.rmx),swap(u.s[0],u.s[1]);
            push_up(R),push_up(L);
        }
        else if(op[2]=='T'){ //求和
            int posi,tot;
            scanf("%d%d",&posi,&tot);
            
            int L=find_kth(posi),R=find_kth(posi+tot+1);
            splay(L,0),splay(R,L);
            printf("%d\n",tr[tr[R].s[0]].sum);
        }
        else if(op[2]=='X') printf("%d\n",tr[root].mx);  //最大子序列的和
    }
    
    return 0;
}