由于题目要求各个集合内的人最终位置相同,而不同集合的人最终位置不同,容易想到容斥。
记 分别表示三个集合内的人, 为集合 内的人走 步到同一个点的方案数,则易得答案为
首先考虑从一个点到另一个点的走法有多少种。
特判两种特殊情况:一是坐标奇偶性与步数不符,二是距离过远无法到达。
我们将从原点 开始,走 步到达某个坐标的方案数列出来,这可以用手动递推解决,为了描述方便,我们把坐标系旋转 。
当 时,结果为
但是这样似乎并没有什么规律,那么当 时,结果为
这里有个明显的特征就是矩阵四条边是组合数,仔细观察也可以发现中间每个数都是所在行第一个数与所在列第一个数的乘积。
下面使用数学归纳法证明这个结论。
当 时,结论显然成立。
若 时结论成立,则矩阵为
设上面矩阵的行与列从 开始编号,且第 行第 列的数为 ,那么有
则当 时,设其矩阵的行与列从 开始编号,且第 行第 列的数为 ,则易得
结论成立,证毕。
我们枚举该集合 中的人最终到达的坐标(这里指的是旋转后的坐标)。则方法数为
我们发现 与 无关,那么只需预处理这个式子,在枚举时就可以做到 。
// 2022.08.16
#include<bits/stdc++.h>
using namespace std;
const int mod=1e9+7;
long long power(long long x,long long t=mod-2){
long long tmp=1;
for(;t;t>>=1,x=x*x%mod)
if(t&1)tmp=tmp*x%mod;
return tmp;
}
struct point{
int x,y;
void read(){
int a,b;
scanf("%d%d",&a,&b);
x=a+b,y=a-b;
}
}t,A[1001],B[1001],C[1001];
int anum,bnum,cnum;
long long fac[3001],invf[3001];
void init(int n){
fac[0]=1;
for(int i=1;i<=n;i++)
fac[i]=fac[i-1]*(long long)i%mod;
invf[n]=power(fac[n]);
for(int i=n-1;i>=0;i--)
invf[i]=invf[i+1]*(i+1ll)%mod;
}
long long calC(int n,int m){
if(m<0||m>n)return 0;
return 1ll*fac[n]*invf[m]%mod*invf[n-m]%mod;
}
int m; long long f[6001];
point p[1001]; int cnt;
long long work(bool ha,bool hb,bool hc){
cnt=0;
if(ha)for(int i=1;i<=anum;i++)
p[++cnt]=A[i];
if(hb)for(int i=1;i<=bnum;i++)
p[++cnt]=B[i];
if(hc)for(int i=1;i<=cnum;i++)
p[++cnt]=C[i];
int tmp=-1;
for(int i=1;i<=cnt;i++)
if((p[i].x&1)!=tmp){
if(tmp==-1)tmp=p[i].x&1;
else return 0;
}
tmp=-1;
for(int i=1;i<=cnt;i++)
if((p[i].y&1)!=tmp){
if(tmp==-1)tmp=p[i].y&1;
else return 0;
}
int minx=114514,maxx=-114514,miny=114514,maxy=-114514;
for(int i=1;i<=cnt;i++)
minx=min(minx,p[i].x),maxx=max(maxx,p[i].x),
miny=min(miny,p[i].y),maxy=max(maxy,p[i].y);
for(int x=maxx-m;x<=minx+m;x++){
f[x+3000]=1;
for(int i=1;i<=cnt;i++)
f[x+3000]=f[x+3000]*(m-x+p[i].x)%mod
*power(m+x-p[i].x+2)%mod;
}
long long answer=0;
for(int y=maxy-m;y<=miny+m;y+=2){
long long tmp=1;
for(int i=1;i<=cnt;i++)
tmp=tmp*calC(m,m-y+p[i].y>>1)%mod*
calC(m,m+(p[i].x-maxx>>1))%mod;
for(int x=maxx-m;x<=minx+m;x+=2){
answer+=tmp,answer%=mod;
tmp*=f[x+3000],tmp%=mod;
}
}
return answer;
}
int main(){
freopen("pretend.in","r",stdin);
freopen("pretend.out","w",stdout);
init(3000);
int n;
scanf("%d%d%d%d",&n,&anum,&bnum,&m);
cnum=n-anum-bnum;
for(int i=1;i<=anum;i++)A[i].read();
for(int i=1;i<=bnum;i++)B[i].read();
for(int i=1;i<=cnum;i++)C[i].read();
long long answer=0,ansA,ansB,ansC;
ansA=work(1,0,0),ansB=work(0,1,0),ansC=work(0,0,1);
answer=ansA*ansB%mod*ansC%mod;
answer-=work(1,1,0)*ansC%mod;
answer-=work(0,1,1)*ansA%mod;
answer-=work(1,0,1)*ansB%mod;
answer+=(work(1,1,1)<<1)%mod;
answer=answer%mod+mod,answer%=mod;
printf("%lld\n",answer);
return 0;
}