String Halving by pooq

f:=method(s,"{".. if(1==a:=s size/2+.5,s,f(s slice(0,a)).. f(s slice(a))).."}");f(File standardInput readLine)print

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

download

return to the top page