#pragma GCC optimize("Ofast") #pragma GCC target("avx2") #define rd_init() char*rp=({char*mmap();mmap(0l,1l<<25,1,2,0,0ll);}) #define rd() ({int _v=0,_c;while(_c=*rp++-48,_c>=0)_v=_v*10+_c;_v;}) #define wt(v) ({ulong _z=v;do*--wp=_z%10+48;while(_z/=10);}) #define wt1(v) ({char wbuf[64],*wp=wbuf+sizeof wbuf;wt(v);write(1,wp,wbuf+sizeof wbuf-wp);}) #define reps(v,s,e) for(typeof(e)v=s;v>1; ulong z; if(rp[1]=='('){ z=nazo[n>>6]; ulong s=n&~63; ulong a=1; ulong b=1; reps(i,s,n){ a=a*(i*2+1)%MD; b=b*(i*2+2)%MD; } z=z*a%MD; z=z*b%MD; ulong e=s+64; ulong c=1; reps(i,n,e){ c=c*(i+1)%MD; } z=z*c%MD; z=z*c%MD; }else{ z=1; ulong a=2; while(n){ if(n&1){ z=z*a%MD; } a=a*a%MD; n>>=1; } } wt1(z); _exit(0); }