有没有比以下更好的方法:
(defn in-interval?
"Returns a predicate that tests if its argument falls in
the inclusive interval [a, b]."
[a b]
(fn [x] (and (>= x a) (<= x b))))
正在使用:
((in-interval? 5 8) 5.5) ; true
((in-interval? 5 8) 9) ; false
例如,我不想使用range
,因为它会构造一个惰性序列。