#include <cstdio>
#include <algorithm>
#include <cstring>

namespace mirai {

bool maze[15][15];
int prog[4];
bool vst[15][15][4][4];
char str[11][10] = {"GOTO 4", "GOTO 3", "GOTO 2", "GOTO 1", "LEFT", "FORWARD", "RIGHT", "IF-OPEN 1", "IF-OPEN 2", "IF-OPEN 3", "IF-OPEN 4"};

int main(int argc, char** argv) {
  int n, m;
  std::scanf("%d%d", &n, &m);
  std::memset(maze, 0x01, sizeof(maze));
  int y1, y2;
  for (int i = 1; i <= n; ++i) {
    for (int j = 1; j <= m; ++j) {
      char ch;
      std::scanf(" %c", &ch);
      maze[i][j] = (ch == '#');
      if (ch == 'S') {
        y1 = j;
      }
      if (ch == 'G') {
        y2 = j;
      }
    }
  }
  
  int len;
  int move[4][2] = {{-1, 0}, {0, 1}, {1, 0}, {0, -1}};
  auto halt = [&](int len2) -> bool {
//    std::printf("halt(%d)\n", len2);
    std::memset(vst, 0x00, sizeof(vst));
    int x = 1, y = y1, l = 0, f = 2;
    while (true) {
      if (x == n && y == y2) { return true; }
      if (vst[x][y][l][f]) { return false; }
      vst[x][y][l][f] = true;
      int ord = std::abs(prog[l]), open = !maze[x + move[f][0]][y + move[f][1]];
//      std::printf(" %d %d %d %d %d %d\n", x, y, l, f, ord, open);
      if (ord == 0) {
        if (open) {
          x += move[f][0];
          y += move[f][1];
        }
        l = (l + 1) % len2;
      } else if (ord == 1) {
        f = (f + prog[l]) & 3;
        l = (l + 1) % len2;
      } else {
        if (open || prog[l] < 0) {
          l = ord - 2;
        } else {
          l = (l + 1) % len2;
        }
      }
    }
  };
  
  len = 1;
  for (prog[0] = -5; prog[0] <= 5; ++prog[0]) {
    int ord = std::abs(prog[0]);
    if (ord == 2 || ord >= len + 2) { continue; }
    if (halt(len)) {
      std::printf("%d\n", len);
      for (int i = 0; i < len; ++i) {
        std::puts(str[prog[i] + 5]);
      }
      return 0;
    }
  }
  
  len = 2;
  for (prog[0] = -5; prog[0] <= 5; ++prog[0]) {
    int ord = std::abs(prog[0]);
    if (ord == 2 || ord >= len + 2) { continue; }
    for (prog[1] = -5; prog[1] <= 5; ++prog[1]) {
      int ord = std::abs(prog[1]);
      if (ord == 3 || ord >= len + 2) { continue; }
      if (halt(len)) {
        std::printf("%d\n", len);
        for (int i = 0; i < len; ++i) {
          std::puts(str[prog[i] + 5]);
        }
        return 0;
      }
    }
  }
  
  len = 3;
  for (prog[0] = -5; prog[0] <= 5; ++prog[0]) {
    int ord = std::abs(prog[0]);
    if (ord == 2 || ord >= len + 2) { continue; }
    for (prog[1] = -5; prog[1] <= 5; ++prog[1]) {
      int ord = std::abs(prog[1]);
      if (ord == 3 || ord >= len + 2) { continue; }
      for (prog[2] = -5; prog[2] <= 5; ++prog[2]) {
        int ord = std::abs(prog[2]);
        if (ord == 4 || ord >= len + 2) { continue; }
        if (halt(len)) {
          std::printf("%d\n", len);
          for (int i = 0; i < len; ++i) {
            std::puts(str[prog[i] + 5]);
          }
          return 0;
        }
      }
    }
  }
  
  len = 4;
  for (prog[0] = -5; prog[0] <= 5; ++prog[0]) {
    int ord = std::abs(prog[0]);
    if (ord == 2 || ord >= len + 2) { continue; }
    for (prog[1] = -5; prog[1] <= 5; ++prog[1]) {
      int ord = std::abs(prog[1]);
      if (ord == 3 || ord >= len + 2) { continue; }
      for (prog[2] = -5; prog[2] <= 5; ++prog[2]) {
        int ord = std::abs(prog[2]);
        if (ord == 4 || ord >= len + 2) { continue; }
        for (prog[3] = -5; prog[3] <= 5; ++prog[3]) {
          int ord = std::abs(prog[3]);
          if (ord == 5 || ord >= len + 2) { continue; }
          if (halt(len)) {
            std::printf("%d\n", len);
            for (int i = 0; i < len; ++i) {
              std::puts(str[prog[i] + 5]);
            }
            return 0;
          }
        }
      }
    }
  }
  
  std::puts("5");
  std::puts("LEFT");
  std::puts("IF-OPEN 5");
  std::puts("RIGHT");
  std::puts("GOTO 2");
  std::puts("FORWARD");
      
  return 0;
}

}

int main(int argc, char** argv) {
  return mirai::main(argc, argv);
}