f:fix;sum((sum(?princ(if j=f(i/3)-f(i/5)then i elseif i>9then" "else" "),i,1,f(min(j*7.5-mod(j,2),95)+5)),newline()),j,0,14);
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page