8 lines
100 B
Clojure
8 lines
100 B
Clojure
(ns advent.zone)
|
|
|
|
(defn box [x1 y1 x2 y2]
|
|
(fn [x y]
|
|
(and
|
|
(< x1 x x2)
|
|
(< y1 y y2))))
|