r=reverse m@main=getLine>>=putStrLn.r.b.r>>m b[]=[] b(q:x)|q<'1'='1':x|1>0='0':b x
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page