Exported new nat functions
This commit is contained in:
parent
691b01e15a
commit
63bbb50752
|
@ -2,7 +2,7 @@
|
||||||
(require "sugar.rkt" "bool.rkt")
|
(require "sugar.rkt" "bool.rkt")
|
||||||
;; TODO: override (all-defined-out) to enable exporting all these
|
;; TODO: override (all-defined-out) to enable exporting all these
|
||||||
;; properly.
|
;; properly.
|
||||||
(provide Nat z s add1 sub1 plus nat-equal? even? odd?)
|
(provide Nat z s add1 sub1 plus mult exp square nat-equal? even? odd?)
|
||||||
(module+ test
|
(module+ test
|
||||||
(require rackunit))
|
(require rackunit))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user