1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114
| #include<iostream> #include<cstdio> using namespace std; const int N=5e5+10,mod=1004535809,G=3,Gi=334845270; template <class T> inline void read(T &x) { x=0;bool f=0; char ch=getchar(); while(ch<'0'||ch>'9'){if(ch=='-')f=1;ch=getchar();} while(ch>='0'&&ch<='9')x=(x<<1)+(x<<3)+(ch^48),ch=getchar(); if(f)x=-x; } template <class T,class ...T1> inline void read(T &x,T1 &...x1) { read(x),read(x1...); } int n; int fac[N],finv[N]; int bit,tot,rev[N]; int g[N],ginv[N],h[N]; int c[N];
inline void init(int len) { bit=0; while((1<<bit)<(len<<1))bit++; tot=1<<bit; for(int i=0;i<tot;i++) rev[i]=(rev[i>>1]>>1)|((i&1)<<bit-1); } inline int adj(int x){return (x>=mod)?x-mod:x;} inline int qpow(int x,int k) { int res=1; while(k) { if(k&1)res=1ll*res*x%mod; x=1ll*x*x%mod; k>>=1; } return res; } inline void NTT(int *a,int inv) { for(int i=0;i<tot;i++) if(rev[i]<i)swap(a[rev[i]],a[i]); for(int mid=1;mid<tot;mid<<=1) { int g=qpow(inv==1?G:Gi,(mod-1)/(mid<<1)); for(int i=0;i<tot;i+=(mid<<1)) for(int j=0,cur=1;j<mid;j++,cur=1ll*cur*g%mod) { int x=a[i+j],y=1ll*cur*a[i+j+mid]%mod; a[i+j]=adj(x+y),a[i+j+mid]=adj(x-y+mod); } } }
void poly_mul(int *a,int *b,int n) { init(n); NTT(a,1),NTT(b,1); for(int i=0;i<tot;i++) a[i]=1ll*a[i]*b[i]%mod; NTT(a,-1); int inv=qpow(tot,mod-2); for(int i=0;i<tot;i++) a[i]=adj(1ll*a[i]*inv%mod+mod); }
void poly_inv(int *a,int *b,int len) { if(len==1) { b[0]=qpow(a[0],mod-2); return ; } poly_inv(a,b,(len+1)>>1); init(len); for(int i=(len+1)>>1;i<tot;i++)b[i]=0; for(int i=0;i<tot;i++) c[i]=(i<len?a[i]:0); NTT(b,1),NTT(c,1); for(int i=0;i<tot;i++) b[i]=1ll*adj(2-1ll*b[i]*c[i]%mod+mod)*b[i]%mod; NTT(b,-1); int inv=qpow(tot,mod-2); for(int i=0;i<tot;i++) b[i]=adj(1ll*b[i]*inv%mod+mod); for(int i=len;i<tot;i++)b[i]=0; }
int main() { read(n); fac[0]=finv[0]=1; for(int i=1;i<=n;i++) fac[i]=1ll*fac[i-1]*i%mod,finv[i]=qpow(fac[i],mod-2); g[0]=1; for(int i=1;i<=n;i++) { int res=qpow(2,(1ll*i*(i-1)/2)%(mod-1)); g[i]=1ll*res*finv[i]%mod; h[i]=1ll*res*finv[i-1]%mod; } n++; poly_inv(g,ginv,n); poly_mul(h,ginv,n); n--; printf("%d\n",1ll*h[n]*fac[n-1]%mod); return 0; }
|