Square root of 1 in mod 1e300 by henkma

main=readLn>>=(!!297).f
f x=print x:f(mod(1-div x 2^10*2)$10^300)

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

download

return to the top page