(apply print(do((i 1)(j 2)(n 1(- 3 n))(k`(1 2 2,@(make-list 9997))))((> j 9998)k)(dotimes'(~ k(inc! i))(set!(~ k(inc! j))n))))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page