(define interval-test
 (lambda (x y z)
   (and (> z x)
	(< z y))))


(define make-interval-test
 (lambda (x y)
   (lambda  (z)
     (and (> z x)
	  (< z y)))))
 
(make-interval-test 2 7)
((make-interval-test 2 7) 5)
((make-interval-test 2 7) 2)

(filter (make-interval-test 2 7) '(0 1 2 3 4 5 6 7 8 9 10))