main=interact f f[a]='{':a:"}" f x|(a,b)<-splitAt(div(length x+1)2)x='{':f a++f b++"}"

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

download

return to the top page