 	 ))
        ))
 
-(time (doall (pmap (fn [whale] (insert whales-model whale)) some-whales)))
+(do (time (doall (pmap (fn [whale] (insert whales-model whale)) some-whales))) nil)
 
 (println "LOADED")
 


(def num-whales 1000)

(def some-whales
     (doall (pmap (fn [id] (whale id)) (range num-whales))))

(def some-whales2
     (let [#^Creator creator (.getCreator whale-metadata)]


(? [(split :type)] all-whales)
(? [(split :ocean nil [(ccount)])] all-whales)
(? [(pivot :ocean oceans (keyword (count-value-key nil)))(ccount)(split :ocean)] all-whales)
(? [(union "count/type/ocean")(split :type nil [(pivot :ocean oceans (keyword (count-value-key nil)))(ccount)(split :ocean )])] all-whales)