d:dispterms;d(a:0);sum(thru mod(i,19)+1 do d(a:a+2^i),i,0,19);
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page