z=#read #(while(set! =(list(z)(z)(z)0))(format #t"~y"(inexact->exact(round(sqrt(apply *(map(lambda(x)(-(/(apply + =)2)x))=)))))))

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

download

return to the top page