var
ch1,ch2,ch3,ch4,ch5,ch6:char;
n,m,i,j,k1,k2:longint;
begin
readln(n,m);
for i:=1 to n do
begin
for j:=1 to m-1 do
begin
read(ch1,ch2,ch3,ch4,ch5,ch6);
if (ch1='s') and (ch2='n') and (ch3='u') and (ch4='k') and (ch5='e') then begin k1:=i;k2:=j;end;
end;
read(ch1,ch2,ch3,ch4,ch5);
if (ch1='s') and (ch2='n') and (ch3='u') and (ch4='k') and (ch5='e') then begin k1:=i;k2:=j;end;
readln;
end;
writeln(chr(k2+64),k1);
end.