#include<bits/stdc++.h>
#define pd push_back
#define all(A) A.begin(),A.end()
#define lb lower_bound
#define ve std::vector
typedef long long ll;
typedef long long ll;
typedef __int128 Int;
typedef unsigned long long ul;
typedef long double LD;
bool FileIfstream(std::string name){
	std::ifstream f(name.c_str());
	return f.good();
}
namespace Math{
	ll QP(ll x,ll y,ll mod){ll ans=1;for(;y;y>>=1,x=x*x%mod)if(y&1)ans=ans*x%mod;return ans;}
	ll inv(ll x,ll mod){return QP(x,mod-2,mod);}
}
const int N=2e5+10;
const int mod=998244353;
typedef long double T;
T CX[N][60],B[N];
const int dx[4][2]={{-1,0},{1,0},{0,-1},{0,1}};
int mov[N];
T &F(int x,int y){return CX[x][y-mov[x]];}
const double eps=1e-9;
int sgn(T x){
	if(fabs(x)<eps)return 0;
	if(x>0)return 1;
	if(x<0)return -1;
	return 0;
}
bool equ(T x){return sgn(x)==0;}
void solve(){
	//don't forget to open long long
	int n,m;std::cin>>m>>n;
	ve<int>P(4);
	ve<ve<int>>I(n+1,ve<int>(m+1)),C(n+1,ve<int>(m+1));
	for(auto &p:P)std::cin>>p;
	int tot=0;
	for(int i=0;i<n;i++)
		for(int j=0;j<m;j++){
			char c;std::cin>>c;
			I[i][j]=(c!='X')?tot++:-1;
			if(c=='T')C[i][j]=1;
		}
	for(int i=0;i<tot;i++)
		mov[i]=std::max(0,i-m);
	auto Gauss=[&](int n,int d)->void{
		for(int i=0;i<n;i++){
			if(equ(F(i,i)))continue;
			int u=std::min(n-1,i+d);
			B[i]/=F(i,i);
			for(int j=u;j>=i;j--)F(i,j)/=F(i,i);
			for(int j=i+1;j<=u;j++){
				B[j]-=B[i]*F(j,i);
				for(int k=u;k>=i;k--)
					F(j,k)-=F(i,k)*F(j,i); 
			}
//			for(int i=0;i<tot;i++){
//				for(int j=0;j<tot;j++)
//					std::cout<<F(i,j)<<' ';
//				std::cout<<B[i]<<'\n';
//			}
//			std::cout<<'\n';
		}
		for(int i=n-1;i>=0;i--)
			for(int j=i+1;j<=std::min(n-1,i+d);j++)
				B[i]-=F(i,j)*B[j];
	};
	T CP=0;
	for(int i=0;i<m;i++)
		CP+=I[0][i]!=-1;
	CP=1/CP;
//	for(int i=0;i<n;i++)
//		for(int j=0;j<m;j++)
//			std::cerr<<I[i][j]<<(j+1==m?'\n':' '); 
	auto check=[&](int x,int y)->bool{
		return x>=0&&x<n&&y>=0&&y<m;};
	for(int i=0;i<n;i++)
		for(int j=0;j<m;j++)
			if(I[i][j]!=-1){
				int ID=I[i][j];
				if(!i)B[ID]=CP;
				F(ID,ID)=1;
				T PT=100;
				if(!C[i][j]){
					for(int k=0;k<4;k++){
						int x=i+dx[k][0],y=j+dx[k][1];
						if(!check(x,y)||I[x][y]==-1)
							PT-=P[k];
					}
					for(int k=0;k<4;k++){
						int x=i+dx[k][0],y=j+dx[k][1];
						if(check(x,y)&&I[x][y]!=-1)
							F(I[x][y],ID)=-1.0*P[k]/PT;
					}
				}
			}
//	for(int i=0;i<tot;i++){
//		for(int j=0;j<tot;j++)
//			std::cout<<F(i,j)<<' ';
//		std::cout<<B[i]<<'\n';
//	} 
	Gauss(tot,m);
	for(int i=0;i<n;i++)
		for(int j=0;j<m;j++)
			if(C[i][j])
				std::cout<<std::fixed<<std::setprecision(15)<<B[I[i][j]]<<'\n';
}
int main(){
#ifndef ONLINE_JUDGE
	if(!FileIfstream("IO.in")){
		freopen("IO.in","w",stdout);
		return 0;
	}
	freopen("IO.in","r",stdin);
	freopen("IO.out","w",stdout);
#endif
	std::ios::sync_with_stdio(false);
	std::cin.tie(0);
	std::cout.tie(0);
	int T=1;
	//std::cin>>T;
	while(T--)solve();

#ifndef ONLINE_JUDGE
	std::cerr<<std::fixed<<std::setprecision(10)<<1.0*clock()/CLOCKS_PER_SEC<<'\n';
#endif

	return 0;
}