#include<bits/stdc++.h>
#define int long long
using namespace std;
#define fi first
#define se second
#define rep(i,a,b) for(int i=(a);i<=(b);i++)
#define per(i,a,b) for(int i=(a);i>=(b);i--)
#define eb emplace_back
#define y1 yylyylyylyyl
#define pc __builtin_popcount
typedef pair<int,int> pii;
typedef vector<int> vi;
typedef vector<pii> vp;
typedef unsigned long long ull;
 
long long read() {
    long long res=0, w=1; char c=getchar();
    while(!isdigit(c)) {if(c=='-') w=-1; c=getchar();}
    while(isdigit(c)) {res=res*10+c-48, c=getchar();}
    return res*w;
}

const int N=2009;
int n,x1,x2,x3,x4,x5,x6,x7,x8,x9,deg[N],m,ans;
bitset<2009>e[N];
char s[N];

int C2(int x) {return x*(x-1)/2;}
int C3(int x) {return x*(x-1)*(x-2)/6;}

signed main() {
    n=read();
    rep(i,1,n) {
        scanf("%s",s+1);
        rep(j,1,n) if(s[j]=='B') e[i][j]=1, deg[i]++, m++;
    }
    m/=2;
    x1=m*C2(n-2), x3=C2(m);
    rep(i,1,n) {
        x2+=C2(deg[i])*(n-3);
        x4+=C3(deg[i]);
        x3-=C2(deg[i]);
    }
    rep(i,1,n) rep(j,1,n) if(i!=j) {
        int di=deg[i]-e[i][j], dj=deg[j]-e[i][j];
        auto f=e[i]&e[j]; int df=f.count();
        x8+=C2(df);
        if(e[i][j]) {
            x5+=df*(n-3);
            x6+=di*dj-df;
            x7+=df*(dj-1);
            x9*=C2(df);
        }
    }
    x5/=6, x6/=2, x7/=2, x8/=4;
    ans=-x1+2*x2+2*x3-3*x4-3*x5-2*x6+2*x7+4*x9;
    printf("%lld\n",ans);
    return 0;
}