A second sieve program that uses some more interesting Modula-3 features, like ranges, sets, and more for loop features. It should have identical output to the previous example.
$ sieve 2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 ... $You can review the main module to see some Modula-3 features for scalar types.