main=mapM print$2:[a|a<-[3..12^4],2^a`mod`a==2,show a==reverse(show a)]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page