#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
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=5009;
int n,m,ans;
char s[N][N];

bool check1(int x,int y) {
    if(y>m-2) return 0;
    if(s[x][y]!='R') return 0;
    if(s[x][y+1]!='G') return 0;
    if(s[x][y+2]!='W') return 0;
    s[x][y]=s[x][y+1]=s[x][y+2]='X';
    return 1;
}
bool check2(int x,int y) {
    if(x>n-2) return 0;
    if(s[x][y]!='R') return 0;
    if(s[x+1][y]!='G') return 0;
    if(s[x+2][y]!='W') return 0;
    s[x][y]=s[x+1][y]=s[x+2][y]='X';
    return 1; 
}

signed main() {
    n=read(), m=read();
    rep(i,1,n) scanf("%s",s[i]+1);
    rep(i,1,n) rep(j,1,m) ans+=check1(i,j);
    rep(i,1,n) rep(j,1,m) ans+=check2(i,j);
    printf("%lld\n",ans);
    return 0;
}