All pastes #182166 Raw Edit

Someone

public text v1 · immutable
#182166 ·published 2006-09-25 19:59 UTC
rendered paste body
;; Question 2

;; interval-proper-subset? : number number number number -> boolean
;; returns whether or not a given interval is a proper subset
;; of another given interval
;; example : (interval-proper-subset? 1 2 -1 3) will return true
;;                           [1,2] is within [-1,3]
;;           (interval-proper-subset? 4.5 5 4.9 5.1) will return false
;;                           [4.5,5] is outside [4.9,5.1]
(define (interval-proper-subset? left1 right1 left2 right2)
 (cond
   [(and (>= left1 left2)(<= right1 right2)) true]
   [else false]
 )
)