(use srfi-42)(define'n(any?-ec(: i 2 n)(exact?(/ n i))))(do-ec(: n 2 2000)(or'n'#0=(+ 2 n)(print n","#0#)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page