Learning Clojure/Branch Monad