9 lines
158 B
Scheme
9 lines
158 B
Scheme
(define len length)
|
|
(define nil '())
|
|
(define ok '())
|
|
(define fold foldl)
|
|
(define reduce fold)
|
|
(define ceil ceiling)
|
|
(define head car)
|
|
(define tail list-tail)
|