import Char g x=iterate(map f)x!!length[x!!194..'~'] main=interact g f 'Z'='A' f 'z'='a' f x|isAlpha x=succ x|1>0=x
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page