;; -*- Mode: Irken -*-

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

(let ((l (range 10)))
  (printn (slice l 0 5))
  (printn (slice l 0 10))
  (printn (slice l 5 10))
  (printn (slice l 9 10))
  (printn (slice l 9 9))
  (printn (slice l 5 3))
  (printn (slice l 3 5))
  (printn (slice l 8 12))
  )