repos
/
sicp
/
tree
/ ex1-4.scm
Blob
Date:
Fri Aug 4 04:57:27 2023 UTC
Message:
Import sources
Actions:
History
|
Blame
|
Raw File
1
(define (a-plus-abs-b a b)
2
((if (> b 0) + -) a b))