bzoj 4451 : [Cerc2015]Frightful Formula FFT

4451: [Cerc2015]Frightful Formula

Time Limit: 10 Sec Memory Limit: 64 MB
Submit: 177 Solved: 57
[Submit][Status][Discuss]

Description

给你一个n*n矩阵的第一行和第一列，其余的数通过如下公式推出：

F[i,j]=a*f[i,j-1]+b*f[i-1,j]+c

求f[n][n]%(10^6+3)

Input

第一行三个数n，a，b，c

第二行n个数，第i个表示f[i][1]

第三行n个数，第i个表示f[1][i]

Output

仅一个数表示f[n][n]%(10^6+3)

Sample Input

Sample Input1:
3 0 0 0
0 0 2
0 3 0

Sample Input2:
4 3 5 2
7 1 4 3
7 4 4 8

Sample Output

Sample Output1:
0

Sample Output2:
41817
数据范围：
2<=n<=200000
其余的数大于等于0小于等于10^6

首先这道题每个变量对答案的贡献需要分开考虑。
第一行第i个数贡献为$a[1][i]\times a^{n-i} \times b^{n-1}\times C^{n-i}_{2n-i-2}$
相当于每个点先转到第二列对应点上，然后类似杨辉三角形向右下拓展，乘上对应的a和b。
列同理。
因为每个点会多产生出来一个c，所以还有一部分是c的贡献。
$$c\times \sum^{n}_{i=2} \sum^{n}_{j=2} a^{n-i}b^{n-j}C^{n-i}_{2n-i-j}=c\times \sum^{2n}_{i=4}(2n-i)!\sum_{j=2}^{n} \frac{a^{n-i+j}}{(n-i+j)!}\times \frac{b^{n-j}}{(n-j)!}$$
上FFT.
为了避免掉精度，把每个数拆成$a*1024+b$的两部分别卷积再合起来。

#include<iostream>

#include<cstdio>

#include<algorithm>

#include<cstring>

#include<cmath>

#define pi acos(-1)

#define ll long long

#define N 524289

#define NX 200005

using namespace std;

struct E

{

	double x,y;

	E (){;}

	E (double _x,double _y){x=_x,y=_y;}

	E operator + (const E a){return E(a.x+x,a.y+y);};

	E operator - (const E a){return E(x-a.x,y-a.y);};

	E operator * (const E a){return E(x*a.x-y*a.y,x*a.y+y*a.x);};

}a[N],b[N];

int n,R[N];

void FFT(E *a,int f)

{

	for(int i=0;i<n;i++)if(i<R[i])swap(a[i],a[R[i]]);

	for(int i=1;i<n;i<<=1)

	{

		E wn(cos(pi/i),f*sin(pi/i));

		for(int j=0;j<n;j+=(i<<1))

		{

			E w(1,0);

			for(int k=0;k<i;k++,w=w*wn)

			{

				E x=a[j+k],y=w*a[j+k+i];

				a[j+k]=x+y;a[j+k+i]=x-y;

			}

		}

	}

	if(f==-1)for(int i=0;i<n;i++)a[i].x/=n;

	return ;

}

const int p = 1000003;

const int M = 1024;

ll pw(ll x,ll y)

{

	ll lst=1;

	while(y)

	{

		if(y&1)lst=lst*x%p;

		y>>=1;

		x=x*x%p;

	}

	return lst;

}

int l[NX],r[NX],pwa[NX],pwb[NX],jie[2*NX],ni[NX];

ll A0[N],B0[N],A1[N],B1[N],T1[N],T2[N],T3[N],T4[N];

void mul(ll *ans,ll *a1,ll *b1)

{

	for(int i=0;i<n;i++)a[i].x=a[i].y=b[i].x=b[i].y=0;

	for(int i=0;i<n;i++)a[i].x=a1[i];

	for(int i=0;i<n;i++)b[i].x=b1[i];

	FFT(a,1);FFT(b,1);

	for(int i=0;i<n;i++)a[i]=a[i]*b[i];

	FFT(a,-1);

	for(int i=0;i<n;i++)ans[i]=((ll)(a[i].x+0.5))%p;

	return ;

}

int main()

{

	int tn,ta,tb,tc;

	scanf("%d%d%d%d",&tn,&ta,&tb,&tc);

	for(int i=1;i<=tn;i++)scanf("%d",&l[i]);

	for(int i=1;i<=tn;i++)scanf("%d",&r[i]);

	jie[0]=1;ni[0]=ni[1]=1;

	for(int i=1;i<=2*tn;i++)jie[i]=1LL*jie[i-1]*i%p;

	for(int i=2;i<=tn;i++)ni[i]=(1LL*(-p/i)*ni[p%i]%p+p)%p;

	for(int i=1;i<=tn;i++)ni[i]=1LL*ni[i]*ni[i-1]%p;

	pwa[0]=1;pwb[0]=1;

	for(int i=1;i<=tn;i++)pwa[i]=1LL*pwa[i-1]*ta%p;

	for(int i=1;i<=tn;i++)pwb[i]=1LL*pwb[i-1]*tb%p;

	for(int i=1;i<=tn;i++)T1[i]=1LL*pwa[tn-i]*ni[tn-i]%p;

	for(int i=1;i<=tn;i++)T2[i]=1LL*pwb[tn-i]*ni[tn-i]%p;

	ll ans=0;

	for(int i=2;i<=tn;i++)ans+=1LL*r[i]*pwb[tn-1]%p*pwa[tn-i]%p*jie[2*tn-i-2]%p*ni[tn-2]%p*ni[tn-i]%p;

	for(int i=2;i<=tn;i++)ans+=1LL*l[i]*pwa[tn-1]%p*pwb[tn-i]%p*jie[2*tn-i-2]%p*ni[tn-2]%p*ni[tn-i]%p;

	int l=0;n=1;

	while(n<=tn<<1)n<<=1,l++;

	for(int i=0;i<n;i++)R[i]=(R[i>>1]>>1)|((i&1)<<(l-1));

	for(int i=2;i<=tn;i++)

	{

		A0[i]=T1[i]%M;A1[i]=T1[i]/M;

		B0[i]=T2[i]%M;B1[i]=T2[i]/M;

	}

	memset(T1,0,sizeof(T1));memset(T2,0,sizeof(T2));

	mul(T1,A0,B0);mul(T2,A1,B0);mul(T3,A0,B1);mul(T4,A1,B1);

	for(int i=0;i<n;i++)

	{

		T2[i]+=T3[i];

		(T1[i]+=T2[i]*M%p+T4[i]*M%p*M%p)%=p;

	}

	ll tmp=0;

	for(int i=4;i<=2*tn;i++)

	{

		tmp+=1LL*jie[2*tn-i]*T1[i]%p;

		tmp%=p;

	}tmp=tmp*tc%p;

	ans=(ans+tmp)%p;

	printf("%lld\n",ans);

    return 0;

}