var w=3 for(l<-"\x1f\x1d\x1f\x1e\x1f\x1e\x1f\x1f\x1e\x1f\x1e\x1f";d<-1 to l)printf(" "*(1/d*w%7*3)+"%3d"+"\n"*Seq(w%7/6,2)(d/l),d,w+=1)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page