Additive primes: Difference between revisions
Content deleted Content added
m <del>shose elements are</del> |
m Minor edit to Forth code |
||
Line 133: | Line 133: | ||
dup 0 > |
dup 0 > |
||
while |
while |
||
10 /mod swap r> + >r |
|||
10 / |
|||
repeat |
repeat |
||
drop r> ; |
drop r> ; |