diff options
| author | Mike Vink <mike1994vink@gmail.com> | 2023-05-05 17:41:26 +0200 |
|---|---|---|
| committer | Mike Vink <mike1994vink@gmail.com> | 2023-05-05 17:41:26 +0200 |
| commit | 5bccd56659ea72a6f85d71503f7cc4512bc45950 (patch) | |
| tree | 869cb206eef43b720204f2ae8e5f57e6ceb96723 /coding-exercises/2/83/install-rational.rkt | |
| parent | a3c770f64ce5ee5e2ee3ca2c41a94c111d35c3c2 (diff) | |
finishing up 87
Diffstat (limited to 'coding-exercises/2/83/install-rational.rkt')
| -rw-r--r-- | coding-exercises/2/83/install-rational.rkt | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/coding-exercises/2/83/install-rational.rkt b/coding-exercises/2/83/install-rational.rkt index 96dcef1..73640b7 100644 --- a/coding-exercises/2/83/install-rational.rkt +++ b/coding-exercises/2/83/install-rational.rkt @@ -46,6 +46,8 @@ ;; interface (put 'add '(rational rational) (lambda (x y) (tagme (add-rat x y)))) + (put 'neg '(rational) + (lambda (rat) (tagme (neg-rat rat)))) (put 'sub '(rational rational) (lambda (x y) (tagme (sub-rat x y)))) (put 'mul '(rational rational) |