trimming by m.ukai

let rec(@)x?(s=String.sub(read_line())[|12;5;8|].(x)(11+2*x))i=i>2+x/2*5-3*x&i<9-x*2mod 4&()=print_endline s;x@i+1;;-Obj.magic(@)mod 3@0

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page