(setq s(expt 10 98)n s)(format t"1.~a"(-(dotimes(i 147 n)(set'n(isqrt(+(* s s)(floor(* s s s)n)))))s))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page