 (ns queen-of-hearts.core
   (:require [clojure.core.async :as async]))
-
-(defn foo
-  "I don't do a whole lot."
-  [x]
-  (println x "Hello, World!"))
-
-;; Transducers
-
-
 
 (def flowers ["white carnation"
               "yellow daffodil"

   (map paint-it-red)
   (filter is-a-rose?)))




(def flower-chan (async/chan 1 fix-for-the-queen-xform))

(def result-chan (async/reduce 




(defn paint-it-red [s]
  (str "red "
       (last (clojure.string/split s #"\s"))))

(defn is-a-rose? [s]
  (= "rose"
     (last (clojure.string/split s #"\s"))))

;; Now here is where the transducers come in. We have two transformations
;; that we can apply to a vector of flower strings. In the previous
