记录编号	414503	评测结果	AAAAAAAAAA
题目名称	[HZOI 2015] 有标号的二分图计数 II	最终得分	100
用户昵称	FoolMike	是否通过	通过
代码语言	C++	运行时间	3.122 s
提交时间	2017-06-14 14:25:26	内存使用	10.29 MiB

#include<cstdio>
#include<algorithm>
using namespace std;
typedef long long ll;
const int N=1<<18|1,p=119<<23|1;
int inc(int x,int y){x+=y;return x>=p?x-p:x;}
int dec(int x,int y){x-=y;return x<0?x+p:x;}
int mul(int x,int y){return (ll)x*y%p;}
int power(int x,int y){
	int ans=1;
	for (;y;y>>=1,x=mul(x,x))
		if (y&1) ans=mul(ans,x);
	return ans;
}
int w[N],iw[N];
void init(int n){
	w[0]=1;w[1]=power(3,(p-1)/n);
	for (int i=2;i<=n;i++) w[i]=mul(w[i-1],w[1]);
	for (int i=0;i<=n;i++) iw[i]=w[n-i];
}
void fft(int n,int *a,int *w){
	for (int i=0,j=0;i<n;i++){
		if (i<j) swap(a[i],a[j]);
		for (int k=n>>1;(j^=k)<k;k>>=1);
	}
	for (int i=2;i<=n;i<<=1){
		int m=i>>1,step=n/i;
		for (int j=0;j<n;j+=i)
		for (int k=0,pos=0;k<m;k++,pos+=step){
			int t=mul(a[j+k+m],w[pos]);
			a[j+k+m]=dec(a[j+k],t);
			a[j+k]=inc(a[j+k],t);
		}
	}
}
void getinv(int n,int *a,int *b){
	if (n==1) return void(b[0]=power(a[0],p-2));
	getinv((n+1)>>1,a,b);
	int size=1;
	while (size<n+n) size<<=1;
	init(size);
	static int tmp[N];
	for (int i=0;i<n;i++) tmp[i]=a[i];
	for (int i=n;i<size;i++) tmp[i]=0;
	fft(size,tmp,w);fft(size,b,w);
	for (int i=0;i<size;i++) b[i]=mul(b[i],dec(2,mul(b[i],tmp[i])));
	fft(size,b,iw);
	int del=power(size,p-2);
	for (int i=0;i<n;i++) b[i]=mul(b[i],del);
	for (int i=n;i<size;i++) b[i]=0;
}
void getroot(int n,int *a,int *b){
	if (n==1) return void(b[0]=1);
	getroot((n+1)>>1,a,b);
	int size=1;
	while (size<n+n) size<<=1;
	init(size);
	static int tmp[N],inv[N];
	for (int i=0;i<size;i++) tmp[i]=inv[i]=0;
	getinv(n,b,inv);
	for (int i=0;i<n;i++) tmp[i]=a[i];
	fft(size,tmp,w);fft(size,inv,w);fft(size,b,w);
	for (int i=0;i<size;i++) b[i]=mul(inc(mul(b[i],b[i]),tmp[i]),mul((p+1)>>1,inv[i]));
	fft(size,b,iw);
	int del=power(size,p-2);
	for (int i=0;i<n;i++) b[i]=mul(b[i],del);
	for (int i=n;i<size;i++) b[i]=0;
}
const int sqrt2=116195171,isqrt2=power(sqrt2,p-2);
int n,f[N],g[N],jc[N],JC[N],inv[N];
int main()
{
	freopen("QAQ_bipartite_two.in","r",stdin);
	freopen("QAQ_bipartite_two.out","w",stdout);
	scanf("%d",&n);
	inv[1]=1;
	for (int i=2;i<=n;i++) inv[i]=mul(p-p/i,inv[p%i]);
	jc[0]=JC[0]=g[0]=1;
	for (int i=1;i<=n;i++){
		jc[i]=mul(jc[i-1],i);
		JC[i]=mul(JC[i-1],inv[i]);
		g[i]=mul(JC[i],power(isqrt2,(ll)i*i%(p-1)));
	}
	int size=1;
	while (size<=n+n) size<<=1;
	init(size);
	fft(size,g,w);
	for (int i=0;i<size;i++) g[i]=mul(g[i],g[i]);
	fft(size,g,iw);
	int del=power(size,p-2);
	for (int i=0;i<=n;i++) g[i]=mul(mul(g[i],power(sqrt2,(ll)i*i%(p-1))),del);
	getroot(n+1,g,f);
	for (int i=0;i<=n;i++) f[i]=mul(jc[i],f[i]);
	printf("%d\n",f[n]);
	return 0;
}