#include <fstream>
#include <queue>
using namespace std;
ifstream f("rj.in");
ofstream g("rj.out");
struct Per
{
    int x,y;
};
queue<Per>c;
int n,m,a[105][105],r[105][105],j[105][105];
Per zr,zj,z,z1,z2;
int dx[8]= {-1,-1,-1,0,1,1,1,0};
int dy[8]= {-1,0,1,1,1,0,-1,-1};

void afis_matrix(int a[105][105])
{
    int i,j;
    for(i=0; i<=n; i++)
    {
        for(j=0; j<=m; j++)
            g<<a[i][j]<<' ';
        g<<'\n';
    }
    g<<'\n';
}

void Citire()
{
    int i,j;
    char sir[102];
    f>>n>>m;
    f.get();
    for(i=1; i<=n; i++)
    {
        f.getline(sir,101);
        for(j=1; j<=m; j++)
        {
            if(sir[j-1]=='R')
            {
                z.x=i;
                z.y=j;
                zr=z;
            }
            if(sir[j-1]=='J')
            {
                z.x=i;
                z.y=j;
                zj=z;
            }
            if(sir[j-1]=='X')
                a[i][j]=-1;
        }
    }
    for(i=0; i<=n+1; i++)
        a[i][0]=a[i][m+1]=-1;
    for(i=0; i<=m+1; i++)
        a[0][i]=a[n+1][i]=-1;
}

void Lee(int x, int y, int b[105][105])
{
    int k;
    b[x][y]=1;
    z.x=x;
    z.y=y;
    c.push(z);
    while(!c.empty())
    {
        z1=c.front();
        c.pop();
        for(k=0; k<8; k++)
        {
            z2.x=z1.x+dx[k];
            z2.y=z1.y+dy[k];
            if(!a[z2.x][z2.y] && !b[z2.x][z2.y])
            {
                b[z2.x][z2.y]=b[z1.x][z1.y]+1;
                c.push(z2);
            }
        }
    }
}

void Rezolvare()
{
    int i,k,mini=11000;
    z.x=-1,z.y=-1;
    for(i=1; i<=n; i++)
        for(k=1; k<=m; k++)
            if(r[i][k]==j[i][k] && r[i][k])
                if(r[i][k]<mini)
                {
                    mini=r[i][k];
                    z.x=i;
                    z.y=k;
                }
    g<<mini<<' '<<z.x<<' '<<z.y<<'\n';
}

int main()
{
    Citire();
    Lee(zr.x,zr.y,r);
    Lee(zj.x,zj.y,j);
    Rezolvare();
    return 0;
}