(use srfi-1)(do(`car'cdr,display(\ 1(+\ 1))(l(iota 9999 1)(filter(^x(>(mod(inc!\)(max 2`l))0))'l)))(#f),`l," ")
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page