考虑最后路径一定是分三段
左边的先向左走再走回来
中间上下晃
右边先向右走再拐回来
考虑把前2部分合在一起算
每次就把当前列新的可行的第一种加入数组即可
枚举右边用哈希算一下答案
为了方便就把反过来
不过要判一些重复情况
具体看代码（太麻烦了）
#include<bits/stdc++.h>
using namespace std;
const int RLEN=1<<20|1;
inline char gc(){
static char ibuf[RLEN],*ib,*ob;
(ob==ib)&&(ob=(ib=ibuf)+fread(ibuf,1,RLEN,stdin));
return (ob==ib)?EOF:*ib++;
}
#define gc getchar
inline int read(){
char ch=gc();
int res=0,f=1;
while(!isdigit(ch))f^=ch=='-',ch=gc();
while(isdigit(ch))res=(res+(res<<2)<<1)+(ch^48),ch=gc();
return f?res:-res;
}
#define ll long long
#define re register
#define pii pair<int,int>
#define pic pair<int,char>
#define fi first
#define se second
#define pb push_back
#define cs const
#define bg begin
#define poly vector<int>
#define chemx(a,b) ((a)<(b)?(a)=(b):0)
#define chemn(a,b) ((a)>(b)?(a)=(b):0)
cs int mod=1e9+7;
inline int add(int a,int b){return (a+=b)>=mod?a-mod:a;}
inline void Add(int &a,int b){(a+=b)>=mod?a-=mod:0;}
inline int dec(int a,int b){return (a-=b)<0?a+mod:a;}
inline void Dec(int &a,int b){(a-=b)<0?a+=mod:0;}
inline int mul(int a,int b){return 1ll*a*b%mod;}
inline void Mul(int &a,int b){a=1ll*a*b%mod;}
inline int ksm(int a,int b,int res=1){for(;b;b>>=1,Mul(a,a))(b&1)&&(Mul(res,a),1);return res;}
inline int Inv(int x){return ksm(x,mod-2);}
cs int N=2005;
int n,m;
char a[2][N],s[N];
int f[2][N][N];
int pw1[N],pw2[N];
cs int bas1=1331,mod1=1920643713,bas2=233,mod2=771939933;
inline void init(){
pw1[0]=pw2[0]=1;
for(int i=1;i<N;i++)pw1[i]=1ll*pw1[i-1]*bas1%mod1,pw2[i]=1ll*pw2[i-1]*bas2%mod2;
}
struct Hash{
int has1[N],has2[N];
inline void init(char *s){
for(int i=1,len=strlen(s+1);i<=len;i++)
has1[i]=(1ll*has1[i-1]*bas1+s[i]-'a'+1)%mod1,has2[i]=(1ll*has2[i-1]*bas2+s[i]-'a'+1)%mod2;
}
inline pii query(int l,int r){
return pii(((has1[r]-1ll*has1[l-1]*pw1[r-l+1])%mod1+mod1)%mod1,((has2[r]-1ll*has2[l-1]*pw2[r-l+1])%mod2+mod2)%mod2);
}
}S,pre[2],suf[2];
inline bool operator ==(cs pii &a,cs pii &b){
return a.fi==b.fi&&a.se==b.se;
}
inline int calc(char *s,int dir){
memset(f,0,sizeof(f));
int res=0;
for(int i=0;i<=n;i++){
for(int k=2;k*2<=m&&k<=i;k++)if(!dir||k*2!=m){
if(suf[0].query(n-i+1,n-i+k)==S.query(1,k)&&pre[1].query(i-k+1,i)==S.query(k+1,2*k))Add(f[1][i][2*k],1);
if(suf[1].query(n-i+1,n-i+k)==S.query(1,k)&&pre[0].query(i-k+1,i)==S.query(k+1,2*k))Add(f[0][i][2*k],1);
}
f[0][i][0]=1,f[1][i][0]=1;
for(int k=2;2*k<=m&&i+k<=n;k++)if(!dir||k*2!=m){
if(pre[0].query(i+1,i+k)==S.query(m-2*k+1,m-k)&&suf[1].query(n-i-k+1,n-i)==S.query(m-k+1,m))Add(res,f[0][i][m-2*k]);
if(pre[1].query(i+1,i+k)==S.query(m-2*k+1,m-k)&&suf[0].query(n-i-k+1,n-i)==S.query(m-k+1,m))Add(res,f[1][i][m-2*k]);
}
for(int j=0;j<m;j++){
if(a[0][i+1]==s[j+1])Add(f[0][i+1][j+1],f[0][i][j]);
if(a[1][i+1]==s[j+1])Add(f[1][i+1][j+1],f[1][i][j]);
if(j+2<=m){
if(a[1][i+1]==s[j+1]&&a[0][i+1]==s[j+2])Add(f[0][i+1][j+2],f[1][i][j]);
if(a[0][i+1]==s[j+1]&&a[1][i+1]==s[j+2])Add(f[1][i+1][j+2],f[0][i][j]);
}
}
Add(res,f[0][i][m]),Add(res,f[1][i][m]);
}
return res;
}
int ans;
int main(){
init();
scanf("%s",a[0]+1);
scanf("%s",a[1]+1);
n=strlen(a[0]+1);
pre[0].init(a[0]);
reverse(a[0]+1,a[0]+n+1);
suf[0].init(a[0]);
reverse(a[0]+1,a[0]+n+1);
pre[1].init(a[1]);
reverse(a[1]+1,a[1]+n+1);
suf[1].init(a[1]);
reverse(a[1]+1,a[1]+n+1);
scanf("%s",s+1);
m=strlen(s+1);
S.init(s);
Add(ans,calc(s,0));
if(m==1){cout<<ans;return 0;}
reverse(s+1,s+m+1);
S.init(s);
Add(ans,calc(s,1));
if(m==2){
for(int i=1;i<=n;i++){
if(a[0][i]==s[1]&&a[1][i]==s[2])Dec(ans,1);
if(a[1][i]==s[1]&&a[0][i]==s[2])Dec(ans,1);
}
}
cout<<ans<<'
';
}