14 lines
127 B
Scheme
14 lines
127 B
Scheme
(define a 15)
|
|
|
|
; basic testing
|
|
|
|
(define (test x)
|
|
(let ([a (+ a 3)]
|
|
[b (- a 39)])
|
|
(+ a b)))
|
|
|
|
(test 1)
|
|
(test 2)
|
|
|
|
|