;; -*- Mode: Irken -*-

(include "lib/core.scm")
(include "lib/pair.scm")
(include "lib/string.scm")

(for-range x (+ 5 5)
   (for-range y 10
      (print-string
       (format "x=" (int x) " y=" (int y) " ")))
   (newline)
   )

(printn (map-range i 10 i))
(printn (map-range i 10 (printn i) (+ i i)))