RosettaCodeData/Task/Leap-year/Clojure/leap-year-2.clj
2024-04-19 16:56:29 -07:00

6 lines
105 B
Clojure

(defn leap-year? [y]
(condp #(zero? (mod %2 %1)) y
400 true
100 false
4 true
false))