SRFI 1

Enumerate numbers

Given a file named “main.scm” with:

(import (scheme base) (srfi 1))

(write-u8 (if (equal? <lhs> <rhs>) 65 66))

When I successfully run stak main.scm

Then the stdout should contain exactly “A”.

Examples

lhs	rhs
(iota 0)	’()
(iota 1)	‘(0)
(iota 2)	‘(0 1)
(iota 3)	‘(0 1 2)
(iota 1 1)	‘(1)
(iota 1 2)	‘(2)
(iota 3 5)	‘(5 6 7)
(iota 3 5 2)	‘(5 7 9)