main=mapM f[1..] f x|x==g x=print x|x/=196=f$x+g x g=read.reverse.show
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page