(#1=dotimes(i(set'v(expt 3(read))))(#1#(j v)(princ(if(some'char=(format()#2="~3,3R"i)(format()#2#j)"111")" ""::")))(terpri))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page