Encoder decoder by teebee(same here)

main=getLine>>=interact.f
f('e':_)(a:b:x)=a:f"e"x++[b]
f _(a:x)=a:f""(reverse x)
f _ x=x

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

download

return to the top page