#include <float.h>
#include <limits.h>
#include <math.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>

// 内部定数
#define D_ON			1										// 汎用フラグ - ON
#define D_OFF			0										// 汎用フラグ - OFF
#define D_SIZE_MAX		505										// 最大サイズ
#define D_TYPE_CNT		2										// 種類数
#define D_TYPE_K		0										// 種類 - ナイト
#define D_TYPE_B		1										// 種類 - ミニビショップ
#define D_STACK_MAX		D_SIZE_MAX * D_SIZE_MAX					// 最大スタック数

// 内部構造体 - スタック情報
typedef struct Stack {
	char mcType;												// 種類
	int miX, miY;												// 位置
} Stack;

// 内部変数
static FILE *szpFpI;											// 入力
static int siW, siH;											// 幅・高さ
static char sc2Mass[D_SIZE_MAX][D_SIZE_MAX];					// マス[Y][X]
static char sc3Done[D_TYPE_CNT][D_SIZE_MAX][D_SIZE_MAX];		// 処理済フラグ[タイプ][Y][X]
static Stack sz1Stack[D_STACK_MAX];								// スタック
static int siSCnt;												// スタック数
static int siSSNo;												// スタック位置 - セット
static int siSGNo;												// スタック位置 - 取得

// 内部変数 - テスト用
#ifdef D_TEST
	static int siRes;
	static FILE *szpFpA;
	static int siTNo;
#endif

// 出力
int
fOut(
	char *pcpLine				// <I> １行
)
{
	char lc1Buf[1024];

#ifdef D_TEST
	fgets(lc1Buf, sizeof(lc1Buf), szpFpA);
	if (strcmp(lc1Buf, pcpLine)) {
		siRes = -1;
	}
#else
	printf("%s", pcpLine);
#endif

	return 0;
}

// スタック - セット
int
fStackSet(
	char mcType					// <I> 種類
	, int piX					// <I> 位置X
	, int piY					// <I> 位置Y
)
{
	// マスチェック
	switch (sc2Mass[piY][piX]) {
	case 'G':							// ゴール
		return 1;

	case 'R':							// 赤
		mcType = !mcType;

	case '.':							// 通常
		break;

	default:							// 範囲外
		return 0;
	}

	// 処理済フラグ
	if (sc3Done[mcType][piY][piX] != D_OFF) {
		return 0;
	}
	sc3Done[mcType][piY][piX] = D_ON;

	// セット
	sz1Stack[siSSNo].mcType = mcType;
	sz1Stack[siSSNo].miX = piX;
	sz1Stack[siSSNo].miY = piY;

	// スタック数
	siSCnt++;

	// スタック位置 - セット
	if (siSSNo < D_STACK_MAX - 1) {
		siSSNo++;
	}
	else {
		siSSNo = 0;
	}

	return 0;
}

// スタック - 取得
int
fStackGet(
	Stack *pzpRet				// <O> 取得値
)
{
	// スタック数
	if (siSCnt < 1) {
		return -1;
	}
	siSCnt--;

	// 取得
	memcpy(pzpRet, &sz1Stack[siSGNo], sizeof(Stack));

	// スタック位置 - 取得
	if (siSGNo < D_STACK_MAX - 1) {
		siSGNo++;
	}
	else {
		siSGNo = 0;
	}

	return 0;
}

// スタート位置をスタックに追加
int
fStart(
)
{
	int i, j;

	// スタート位置の検索
	for (i = 2; i < siH + 2; i++) {
		for (j = 2; j < siW + 2; j++) {
			if (sc2Mass[i][j] == 'S') {
				sc2Mass[i][j] = '.';
				fStackSet(D_TYPE_K, j, i);
				return 0;
			}
		}
	}

	return 0;
}

// 実行メイン
int
fMain(
)
{
	int i, j, liRet;
	char lc1Buf[1024];

	// 幅・高さ - 取得
	fgets(lc1Buf, sizeof(lc1Buf), szpFpI);
	sscanf(lc1Buf, "%d%d", &siH, &siW);

	// マス - 取得
	for (i = 2; i < siH + 2; i++) {
		fgets(&sc2Mass[i][2], sizeof(sc2Mass[0]) - 2, szpFpI);
	}

	// スタート位置をスタックに追加
	fStart();

	// 処理開始
	for (i = 1; ; i++) {

		// スタック数でループ
		int liSCnt = siSCnt;
		if (liSCnt < 1) {
			return -1;
		}
		for (j = 0; j < liSCnt; j++) {

			// スタック - 取得
			Stack lzStack;
			fStackGet(&lzStack);

			// スタック - 追加
			liRet = 0;
			if (lzStack.mcType == D_TYPE_K) {										// ナイト
				liRet += fStackSet(D_TYPE_K, lzStack.miX + 1, lzStack.miY + 2);
				liRet += fStackSet(D_TYPE_K, lzStack.miX + 1, lzStack.miY - 2);
				liRet += fStackSet(D_TYPE_K, lzStack.miX - 1, lzStack.miY + 2);
				liRet += fStackSet(D_TYPE_K, lzStack.miX - 1, lzStack.miY - 2);
				liRet += fStackSet(D_TYPE_K, lzStack.miX + 2, lzStack.miY + 1);
				liRet += fStackSet(D_TYPE_K, lzStack.miX + 2, lzStack.miY - 1);
				liRet += fStackSet(D_TYPE_K, lzStack.miX - 2, lzStack.miY + 1);
				liRet += fStackSet(D_TYPE_K, lzStack.miX - 2, lzStack.miY - 1);
			}
			else {																	// ミニビショップ
				liRet += fStackSet(D_TYPE_B, lzStack.miX + 1, lzStack.miY + 1);
				liRet += fStackSet(D_TYPE_B, lzStack.miX + 1, lzStack.miY - 1);
				liRet += fStackSet(D_TYPE_B, lzStack.miX - 1, lzStack.miY + 1);
				liRet += fStackSet(D_TYPE_B, lzStack.miX - 1, lzStack.miY - 1);
			}

			// ゴール
			if (liRet > 0) {
				return i;
			}
		}
	}

	return 0;
}

// １回実行
int
fOne(
)
{
	int liRet;
	char lc1Buf[1024];

	// データ - 初期化
	memset(sc2Mass, 0, sizeof(sc2Mass));						// マス
	memset(sc3Done, 0, sizeof(sc3Done));						// 処理済フラグ
	siSCnt = 0;													// スタック数
	siSSNo = 0;													// スタック位置 - セット
	siSGNo = 0;													// スタック位置 - 取得

	// 入力 - セット
#ifdef D_TEST
	sprintf(lc1Buf, ".\\Test\\T%d.txt", siTNo);
	szpFpI = fopen(lc1Buf, "r");
	sprintf(lc1Buf, ".\\Test\\A%d.txt", siTNo);
	szpFpA = fopen(lc1Buf, "r");
	siRes = 0;
#else
	szpFpI = stdin;
#endif

	// 実行メイン
	liRet = fMain();

	// 結果 - セット
	sprintf(lc1Buf, "%d\n", liRet);

	// 結果 - 出力
	fOut(lc1Buf);

	// 残データ有無
#ifdef D_TEST
	lc1Buf[0] = '\0';
	fgets(lc1Buf, sizeof(lc1Buf), szpFpA);
	if (strcmp(lc1Buf, "")) {
		siRes = -1;
	}
#endif

	// テストファイルクローズ
#ifdef D_TEST
	fclose(szpFpI);
	fclose(szpFpA);
#endif

	// テスト結果
#ifdef D_TEST
	if (siRes == 0) {
		printf("OK %d\n", siTNo);
	}
	else {
		printf("NG %d\n", siTNo);
	}
#endif

	return 0;
}

// プログラム開始
int
main()
{

#ifdef D_TEST
	int i;
	for (i = D_TEST_SNO; i <= D_TEST_ENO; i++) {
		siTNo = i;
		fOne();
	}
#else
	fOne();
#endif

	return 0;
}