while(h,w=gets.split.map &:to_i)!=(x,y=[0,0]);
m=[];f=[];h.times{f.push [1]*w;m.push gets};
while(?.<c=m[y][x])&&0<b=f[y][x];
f[y][x]=0;(c[?v])?(y+=1):(c[?^])?(y-=1):(c[?<])?(x-=1):(x+=1);end;
puts ["LOOP","#{x} #{y}"][b];
end