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