[CQOI 2018] 交错序列

#include<bits/stdc++.h>
#define ll long long
using namespace std;
int N,M,A,B,S[195],n,AB,T,ans,C[105][105],F[195];
inline int add(int x,int y){ x+=y; return x>=M?x-M:x;}
inline int mul(int x,int y,const int ha){ return x*(ll)y%ha;}
inline int ksm(int x,int y,const int ha){ int an=1; for(;y;y>>=1,x=mul(x,x,ha)) if(y&1) an=mul(an,x,ha); return an;}
struct node{
    int a[187][187];
    inline void clear(){ memset(a,0,sizeof(a));}
    inline void BASE(){ clear(); for(int i=0;i<T;i++) a[i][i]=1;}
    node operator *(const node &u)const{
        node r; r.clear();
        for(int k=0;k<T;k++)
            for(int i=0;i<T;i++)
                for(int j=0;j<T;j++) r.a[i][j]=add(r.a[i][j],mul(a[i][k],u.a[k][j],M));
        return r;
    }
}X,ANS;

inline void build(){
    C[0][0]=1;
    for(int i=1;i<=100;i++){
        C[i][0]=1;
        for(int j=1;j<=i;j++) C[i][j]=add(C[i-1][j-1],C[i-1][j]);
    }
    
    S[n=0]=1;
    for(int i=1;i<=B;i++){
        memcpy(F,S,sizeof(S));
        memset(S,0,sizeof(S));
        for(int j=0;j<=n;j++){
            S[j]=add(S[j],mul(F[j],N,M));
            S[j+1]=add(S[j+1],M-F[j]);
        }
        n++;
    }
    n+=A;
    for(int i=n;i>=A;i--) S[i]=S[i-A];
    fill(S,S+A,0);
    
    X.clear();
    for(int i=0;i<AB;i++){
        for(int j=i;j<AB;j++) X.a[i][j+AB]=C[j][i];
        X.a[i][i]=X.a[i+AB][i]=1;
    }
}

inline void calc(){
    ANS.BASE();
    for(;N;N>>=1,X=X*X) if(N&1) ANS=ANS*X;
    for(int i=0;i<AB;i++) ans=add(ans,mul(add(ANS.a[0][i],ANS.a[0][i+AB]),S[i],M));
}

int main(){
    scanf("%d%d%d%d",&N,&B,&A,&M),AB=A+B+1,T=AB<<1;
    build(),calc();
    printf("%d\n",ans);
    return 0;
}