f=fn s,i,j,f->t=IO.getn(s,1) (j||i>0)&&f.(i<50&&j&&t||1,i<50&&t<"T"&&i+1||0,j&&"K"!=t,f)end f.("",0,0,f)