main=interact(\x->u[u[z|y<-[n,n+2..7^6],z<-lines x,show y==z]|n<-[0,1]]) u=unlines
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page