(format t" Z |~{ 0.0~d~^ ~} ----+~70@{-~}"'(0 1 2 3 4 5 6 7 8 9)t)(dotimes(i 310)(format t"~[ ~,,-2f |~] ~2@*~,4f"(mod i 10)i(/(erfc(/ i -100(sqrt 2)))2)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page