codevs 1170 双栈排序

/*
好题啊 好题啊
而然还是看了一眼题解啊
有那么一点思路 但是离写出代码还很远
考虑必须分开放倒两个栈里的情况
即存在i<j<k 有 a[k]<a[i]<a[j] 这里RMQ n*n搞一下
那如果出现 a b 不在一块 b c 不在一块 a c 不在一块
那么两个栈显然办不了了
所以嘛 因为只有俩栈 染色吧那就
染完判一下输出0的情况
同时不相邻的那些的块块 按字典序染
然后就就模拟一下 就像个普通的火车进站类似的题
只不过有两个栈
注意当可以进2出1的时候 先出1 这样字典序小
（感觉到了字典序深深地恶意）
*/
#include<iostream>
#include<cstdio>
#include<cstring>
#define maxn 1010
using namespace std;
int n,m,a[maxn],num,head[maxn],color[maxn],mx[maxn][],P[maxn],falg;
int s1[maxn],top1,s2[maxn],top2;
struct node{
    int v,pre;
}e[maxn*maxn*];
int max(int x,int y){
    return x>y?x:y;
}
void Add(int from,int to){
    num++;e[num].v=to;
    e[num].pre=head[from];
    head[from]=num;
}
void Insert(){
    memset(mx,/,sizeof(mx));
    for(int i=;i<=n;i++)mx[i][]=a[i];
    for(int j=;j<=;j++)
        for(int i=;i+(<<j)-<=n;i++)
            mx[i][j]=min(mx[i][j-],mx[i+(<<j-)][j-]);
}
void Get(){
    for(int i=;i<=n;i++)
        for(int j=;j<=;j++)
            if((<<j)>i){
                P[i]=j-;break;
            }
}
int Query(int l,int r){
    int k=P[r-l+];
    return min(mx[l][k],mx[r-(<<k)+][k]);
}
int Dfs(int x){
    for(int i=head[x];i;i=e[i].pre){
        int v=e[i].v;
        if(color[v]==){
            color[v]=-color[x];
            if(!Dfs(v))return ;
        }
        else if(color[v]==color[x])return ;
    }
    return ;
}
int main()
{
    scanf("%d",&n);
    for(int i=;i<=n;i++)
        scanf("%d",&a[i]);
    Insert();Get();
    for(int i=;i<=n;i++)
        for(int j=i+;j<=n;j++){
            if(a[i]>a[j])continue;
            int mx=Query(j+,n);
            if(mx<a[i])Add(a[i],a[j]),Add(a[j],a[i]);
        }
    for(int i=;i<=n;i++)
        if(color[i]==){
            color[i]=;
            if(!Dfs(i)){falg=;break;}
        }
    if(falg==){printf("0\n");return ;}
    int now=;
    for(int i=;i<=n;i++){
        if(color[a[i]]==){
            if(a[i]==now){printf("a b ");now++;}
            else{
                while(a[i]>s1[top1]&&top1){
                    top1--;printf("b ");
                }
                s1[++top1]=a[i];printf("a ");
            }
        }
        else {
            if(a[i]==now){printf("c d ");now++;}
            else{
                while(a[i]>s2[top2]&&top2){
                    top2--;printf("b ");
                }
                while(s1[top1]==now){
                    top1--;printf("b ");now++;
                }
                s2[++top2]=a[i];printf("c ");
            }
        }
    }
    for(int i=now;i<=n;i++){
        while(top1&&i==s1[top1]){
            top1--;printf("b ");
        }
        while(top2&&i==s2[top2]){
            top2--;printf("d ");
        }
    }
    return ;
}