lxhgww的小名叫“小L”，这是因为他总是很喜欢L型的东西。小L家的客厅是一个的矩形，现在他想用L型的地板来铺满整个客厅，客厅里有些位置有柱子，不能铺地板。现在小L想知道，用L型的地板铺满整个客厅有多少种不同的方案？

需要注意的是，如下图所示，L型地板的两端长度可以任意变化，但不能长度为0。铺设完成后，客厅里面所有没有柱子的地方都必须铺上地板，但同一个地方不能被铺多次。

输入的第一行包含两个整数，R和C，表示客厅的大小。

接着是R行，每行C个字符。’_’表示对应的位置是空的，必须铺地板；’*’表示对应的位置有柱子，不能铺地板。

输出一行，包含一个整数，表示铺满整个客厅的方案数。由于这个数可能很大，只需输出它除以20110520的余数。

*_

__

#include<queue>
#include<cstdio>
#include<cstring>
#include<algorithm>
using namespace std;
const int INF=20110520;
const int MAXN=177147;
int i;
struct na{int x,z;na(int xx,int zz):x(xx),z(zz){}
};
int n,m,x,y,z,a[21],k,p1,p2,en,t;
bool map[101][101];
int f[2][MAXN+1],ans=0;
int v[2][MAXN+1];
queue <na> q;
inline int gx(int x,int q1,int q2){k=0;for (register int i=m+1;i;i--) k=k*3+(i==x?q1:(i==x+1?q2:a[i]));return k;}
inline void up(int r,int z,int lj){if (r==en){ans+=lj;if (ans>=INF) ans-=INF;return;}r++;k=r%2;if (v[k][z]!=r) v[k][z]=r,f[k][z]=0,q.push(na(r,z));f[k][z]+=lj;if (f[k][z]>=INF) f[k][z]-=INF;
}
char c[101];
int main(){register int i,j,p;scanf("%d%d",&n,&m);if (n<m){swap(n,m);for (j=1;j<=m;j++){scanf("%s",c);for (i=1;i<=n;i++)map[j][i]=c[i-1]=='_';}}else{for (j=1;j<=n;j++){scanf("%s",c);for (i=1;i<=m;i++)map[i][j]=c[i-1]=='_';}}en=n*m-1;while(!map[en%m+1][en/m+1]) en--;f[0][0]=v[0][0]=1;q.push(na(0,0));while(!q.empty()){na no=q.front();q.pop();int an=f[no.x%2][no.z];if(no.x%m==0) no.z*=3;x=no.x%m+1;y=no.x/m+1;for (i=1;i<=m+1;i++) a[i]=0;for (i=1,j=no.z;j;i++,j/=3) a[i]=j%3;if (!map[x][y]) up(no.x,gx(100,0,0),an);elseif (a[x]==1&&a[x+1]==1) up(no.x,gx(x,0,0),an);elseif (a[x]==0&&a[x+1]==0){if (map[x+1][y]) up(no.x,gx(x,0,1),an);if (map[x][y+1]) up(no.x,gx(x,1,0),an);if (map[x][y+1]&&map[x+1][y]) up(no.x,gx(x,2,2),an);}elseif (a[x]==0){if (map[x][y+1]) up(no.x,gx(x,a[x+1],0),an);if (map[x+1][y]&&a[x+1]==1) up(no.x,gx(x,0,2),an);if (a[x+1]==2) up(no.x,gx(x,0,0),an);}elseif (a[x+1]==0){if (map[x+1][y]) up(no.x,gx(x,0,a[x]),an);if (map[x][y+1]&&a[x]==1) up(no.x,gx(x,2,0),an);if (a[x]==2) up(no.x,gx(x,0,0),an);}}printf("%d\n",ans);
}