#include<bits/stdc++.h>
#define fi first
#define se second
#define eb emplace_back
#define mp make_pair
using namespace std;
typedef long double ld;
typedef long long ll;
typedef unsigned long long ull;
typedef __int128 i128; 
template<typename T,typename U>
T ceil(T x, U y) {return (x>0?(x+y-1)/y:x/y);}
template<typename T,typename U>
T floor(T x, U y) {return (x>0?x/y:(x-y+1)/y);}
template<class T,class S>
bool chmax(T &a,const S b) {return (a<b?a=b,1:0);}
template<class T,class S>
bool chmin(T &a,const S b) {return (a>b?a=b,1:0);}
int popcnt(int x) {return __builtin_popcount(x);}
int popcnt(ll x)  {return __builtin_popcountll(x);}
int topbit(int x) {return (x==0?-1:31-__builtin_clz(x));}
int topbit(ll x)  {return (x==0?-1:63-__builtin_clzll(x));}
int lowbit(int x) {return (x==0?-1:__builtin_ctz(x));}
int lowbit(ll x)  {return (x==0?-1:__builtin_ctzll(x));}

#define rep(i,a,b) for(int i=(a);i<=(b);i++)
#define per(i,a,b) for(int i=(a);i>=(b);i--)
typedef pair<int,int> pii; 
typedef vector<int> vi;
typedef vector<pii> vp;
typedef tuple<int,int,int> tiii;
int read() {
  int x=0,w=1; char c=getchar(); 
  while(!isdigit(c)) {if(c=='-') w=-1; c=getchar();}
  while(isdigit(c)) {x=x*10+(c-'0'); c=getchar();}
  return x*w;
}

const int N=105;
int n,m,p[(1<<20)+5],ans,a[N][N];
char s[N][N];

signed main() {
  n=read(), m=read();
  rep(i,1,m) {
    rep(i,1,n) scanf("%s",s[i]+1);
    rep(x,1,n) rep(y,1,n) {
      if(s[x][y]=='R') a[x][y]=0;
      else a[x][y]=1;
    }
    int h=0;
    rep(x,1,n) {
      int res=0;
      rep(y,1,n) res^=a[x][y];
      h=(h<<1)|res;
    }
    rep(y,1,n) {
      int res=0;
      rep(x,1,n) res^=a[x][y];
      h=(h<<1)|res;
    }
    p[h]++;
  }
  rep(i,0,(1<<(2*n))-1) ans+=1ll*p[i]*(p[i]-1)/2;
  printf("%d\n",ans);
  return 0;
}