         (r/rain-chunks m-res ll-res chunk-size tile-seq source))))
 
 ;; TEMPORARY stuff for the big run :-*
+;;
+;; TODO: move to hadoop.io
+
 (defn tiles->globstring
   [& tiles]
-  {:pre [(m/valid-modis? tiles)]}
+  {:pre [(valid-modis? tiles)]}
   (let [hv-seq (interpose "," (for [[th tv] tiles]
                                 (format "h%02dv%02d" th tv)))]
     (format "*{%s}*" (apply str hv-seq))))


   hadoop jar forma-standalone.jar modisdata/MOD13A3/ reddoutput/ [8 6] [10 12]"
  [input-path output-path & tiles]
  {:pre [(m/valid-modis? tiles)]}
  (let [tileseq (map read-string tiles)
        tilestring (str input-path (apply tiles->globstring tileseq))]
    (modis-chunker s/forma-subsets s/chunk-size

                                globbed-wholefile-tap)])
  (:require [forma.source.hdf :as h]
            [forma.source.rain :as r]
            [forma.static :as s])
  (:gen-class))

