1000 digits by notogawa(embed)

import Numeric
main=putStr$take 1000$(iterate(`div`2)$fst$head$readInt 95(`elem`[' '..'~'])(\x->fromEnum x-32)"!!t)cyReCy=JfC'C%?`JZuA_oN{h/;0v,weL|<)]H_-=]QR}>4$Xm8AhU|}0girsGUwfT=AS..EW(U\\v'os\"[)T#.CbYv.hNghg5_YM_eP/_RA1EZm2\\s|:9)Hn%3cF$?0\\y7#5tK|=H@}^6s^M.y9I\\k")>>=show.(`mod`2)

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page