#pragma GCC optimize("O3")
#include<bits/stdc++.h> 
using namespace std;
using ll=long long;
using P=pair<ll,ll>;
template<class T> using V=vector<T>; 
#define fi first
#define se second
#define all(v) (v).begin(),(v).end()
const ll inf=(1e18);
// const ll mod=998244353;
const ll mod=1000000007;
const vector<int> dy={-1,0,1,0},dx={0,-1,0,1};
struct __INIT{__INIT(){cin.tie(0);ios::sync_with_stdio(false);cout<<fixed<<setprecision(15);}} __init;
template<class T> bool chmax(T &a, const T &b) { if (a<b) { a=b; return 1; } return 0; }
template<class T> bool chmin(T &a, const T &b) { if (a>b) { a=b; return 1; } return 0; }
template<class T>void debag(const vector<T> &a){cerr<<"debag :";for(auto v:a)cerr<<v<<" ";cerr<<"\n";}
template<class T>void print(const vector<T> &a){for(auto v:a)cout<<v<<" ";cout<<"\n";}
int main(){
    int n,m;
    cin>>n>>m;
    V<ll> a(n);
    for(int i=0;i<n;i++){
        cin>>a[i];
    }
    V<string> s(n);
    for(int i=0;i<n;i++){
        cin>>s[i];
    }
    V<bool> used(n,false);
    ll ans=0;
    for(int j=0;j<m;j++){
        V<ll> sum(m,0);
        for(int i=0;i<n;i++){
            if(used[i])continue;
            for(int k=0;k<m;k++){
                if(s[i][k]=='o')sum[k]+=a[i];
            }
        }
        ll ma=0,idx=0;
        for(int i=0;i<m;i++){
            if(chmax(ma,sum[i]))idx=i;
        }
        ans+=sum[idx]*sum[idx];
        for(int i=0;i<n;i++){
            if(used[i])continue;
            if(s[i][idx]=='o'){
                used[i]=true;
            }
        }
    }
    cout<<ans<<"\n";
}