Clojure day 3: Sleeping barber.