2
thousand
1
primes #(1: primes_below)
dup
    2
    -
m2
and
m:
    show
    ","
    @0
    2
    +
    show-line