(use srfi-1)
(display 0)
(for-each (cut format #t " ~A" <>) (iota 99999 1))