RosettaCodeData/Task/Integer-comparison/Clojure/integer-comparison.clj

7 lines
218 B
Clojure
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
(let [[a b] (repeatedly read)]
(doseq [[op string] [[< "less than"]
[> "greater than"]
[= "equal to"]]]
(when (op a b)
(println (str a " is " string " " b)))))