Set of real numbers: Difference between revisions

m
minor edits
(Add Common Lisp implementation)
m (minor edits)
Line 163:
(deftype set<= (a b) `(real (,a) ,b))
 
(deftype set-union (i1s1 i2s2) `(or ,i1s1 ,i2s2))
(deftype set-intersection (i1s1 i2s2) `(and ,i1s1 ,i2s2))
(deftype set-diff (i1s1 i2s2) `(and ,i1s1 (not ,i2s2)))
 
(defun in-set-p (x set)
68

edits