(define $main (lambda [$argv] (do {[(each print (map itos primes))]} [])))