#include <bits/stdc++.h>
using namespace std;
vector<pair<char, pair<int, int> > > ans;
pair<int, int> root;
int nr[] = {-1, 1, 0, 0}, n, m;
int nc[] = {0, 0, 1, -1};
char a[509][509];
void dfs(int x, int y) {
  ans.push_back(make_pair('B', pair<int, int>(x, y)));
  a[x][y] = 'B';
  for (int i = int(0); i <= int(3); i++) {
    int nx = x + nr[i];
    int ny = y + nc[i];
    if (nx >= 0 && nx < n && ny >= 0 && ny < m)
      if (a[nx][ny] == '.') dfs(nx, ny);
  }
  if (x != root.first || y != root.second) {
    a[x][y] = 'R';
    ans.push_back(make_pair('D', pair<int, int>(x, y)));
    ans.push_back(make_pair('R', pair<int, int>(x, y)));
  }
}
int main() {
  scanf("%d", &n);
  scanf("%d", &m);
  for (int i = int(0); i <= int(n - 1); i++) {
    scanf("%s", a[i]);
  }
  for (int i = int(0); i <= int(n - 1); i++) {
    for (int j = int(0); j <= int(m - 1); j++) {
      if (a[i][j] == '.') {
        root = make_pair(i, j);
        dfs(i, j);
      }
    }
  }
  printf("%d\n", ans.size());
  for (int i = int(0); i <= int(ans.size() - 1); i++) {
    pair<char, pair<int, int> > u = ans[i];
    printf("%c %d %d\n", u.first, u.second.first + 1, u.second.second + 1);
  }
  return 0;
}
