(reduced x)
Wraps x in a way such that a reduce will terminate with the value x
(defn reduced [x] (Reduced. x))