8 lines
182 B
Scheme
8 lines
182 B
Scheme
|
(define x p_int 12)
|
||
|
|
;(define y int 12)
|
||
|
|
|
||
|
|
|
||
|
|
;(%+ 3 4)
|
||
|
|
;(define add1 (-> int int) (lambda ((x int)) (%+ x 1)))
|
||
|
|
|
||
|
|
;(define alt_add (-> int (-> int int)) (lambda (x) (lambda (y) (%+ x y))))
|