(define $main (lambda [$argv] (each print (map show primes))))