                        [google-tea-service-chan
                         yahoo-tea-service-chan])]
               (async/>! result-chan v))))
-
-
 
 (defn -main [& args]
   (print "Requesting Tea")


(def result-chan (async/chan 10))


(defn request-tea []
  (request-google-tea-service)
  (request-yahoo-tea-service)

(ns async-tea-party.core
  (:require [clojure.core.async :as async])
  (:gen-class))

(def google-tea-service-chan (async/chan 10))
(def yahoo-tea-service-chan (async/chan 10))

(defn random-add []
  (reduce + (conj [] (repeat 1 (rand-int 100000)))))
