#include <bits/stdc++.h>
using namespace std;
const long double PI = atan(1.0) * 4.0;
const long long int M = 1e9 + 7;
const long long int INF = 1e18;
const long double EPS = 0.0000001;
bool cmp(pair<int, int> a, pair<int, int> b) {
  return a.second - a.first < b.second - b.first;
}
int pw(int x, int n, int M) {
  if (n == 0)
    return 1;
  else if (n % 2 == 0)
    return pw((x * x) % M, n / 2, M);
  else
    return (x * pw((x * x) % M, (n - 1) / 2, M)) % M;
}
long long int fm(long long int x, long long int y, string s[], long long int n,
                 long long int m) {
  long long int i, j;
  long long int min1, min2, min3, min4;
  min1 = 0;
  min2 = 0;
  min3 = 0;
  min4 = 0;
  for (i = 1; i + x < n; i++) {
    if (s[i + x][y] == '*')
      min1++;
    else
      break;
  }
  for (i = 1; x - i >= 0; i++) {
    if (s[x - i][y] == '*')
      min2++;
    else
      break;
  }
  for (i = 1; y + i < m; i++) {
    if (s[x][y + i] == '*')
      min3++;
    else
      break;
  }
  for (i = 1; y - i >= 0; i++) {
    if (s[x][y - i] == '*')
      min4++;
    else
      break;
  }
  long long int min5, min6;
  min5 = min(min1, min2);
  min6 = min(min3, min4);
  return min(min5, min6);
}
long long int ch(
    string s[], set<pair<long long int, pair<long long int, long long int>>> s1,
    long long int n, long long int m) {
  char a[n][m];
  long long int i, j;
  for (i = 0; i < n; i++) {
    for (j = 0; j < m; j++) a[i][j] = '.';
  }
  for (set<pair<long long int, pair<long long int, long long int>>>::iterator
           it = s1.begin();
       it != s1.end(); it++) {
    long long int x, y, len;
    x = (*it).second.first;
    y = (*it).second.second;
    x--;
    y--;
    len = (*it).first;
    a[x][y] = '*';
    for (i = 0; i < len; i++) {
      a[x + 1 + i][y] = '*';
      a[x][y + 1 + i] = '*';
      a[x - 1 - i][y] = '*';
      a[x][y - i - 1] = '*';
    }
  }
  long long int is1 = 1;
  for (i = 0; i < n; i++) {
    for (j = 0; j < m; j++) {
      if (s[i][j] != a[i][j]) is1 = 0;
    }
  }
  return is1;
}
int main() {
  ios_base::sync_with_stdio(false), cin.tie(NULL);
  long long int n, m;
  cin >> n >> m;
  string s[n];
  for (int i = 0; i < n; i++) cin >> s[i];
  set<pair<long long int, pair<long long int, long long int>>> s1;
  for (int i = 0; i < n; i++) {
    for (int j = 0; j < m; j++) {
      if (s[i][j] == '*') {
        long long int x = fm(i, j, s, n, m);
        if (x != 0) s1.insert(make_pair(x, make_pair(i + 1, j + 1)));
      }
    }
  }
  if (ch(s, s1, n, m) == 1) {
    cout << s1.size() << endl;
    for (set<pair<long long int, pair<long long int, long long int>>>::iterator
             it = s1.begin();
         it != s1.end(); it++) {
      cout << (*it).second.first << " " << (*it).second.second << " "
           << (*it).first << "\n";
    }
  } else
    cout << "-1";
  return 0;
}
