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