(for i 4096 4607(prn:+(cut(coerce i'string 8)1)" is -"(n-of(= n 9)(if(odd:trunc:/ i(expt 2 --.n))("xwrxwrxwr"n)'-))))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page