chkpt
This commit is contained in:
parent
e0b571618a
commit
e0b684c2f0
|
@ -213,8 +213,7 @@
|
|||
(define %>= (make-binary-arithmetic-relation >=))
|
||||
(define %< (make-binary-arithmetic-relation <))
|
||||
(define %<= (make-binary-arithmetic-relation <=))
|
||||
(define %=/= (make-binary-arithmetic-relation
|
||||
(lambda (m n) (not (= m n)))))
|
||||
(define %=/= (make-binary-arithmetic-relation (compose not =)))
|
||||
|
||||
;type predicates
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user