   ([tdir]
      (delete-file-recursively tdir)))
 
-;; ## Dataset Chunking
+;; ## Chunking Functions
 
 ;; TODO -- This needs some more documentation, but these are the
-;; functions that deal with opened datasets.
-
-(defmapop
-  #^{:doc "Generates metadata values for a given unpacked MODIS
-Dataset and a seq of keys."}
-  [meta-values [meta-keys]] [modis]
-  (let [^Hashtable metadict (metadata modis)]
-    (map #(.get metadict %) meta-keys)))
-
-;; ## Works in Progress, for now.
+;; functions that open datasets, and chunk the resulting integer
+;; arrays.
 
 (defn raster-array
   "Unpacks the data inside of a MODIS band into a 1xN integer array."

   ((juxt tileid->res
          tileid->xy) tileid)))

;; TODO -- show Dan and Robin, and remove these demonstration functions.

;; Guys, are a few ways to accomplish the task solved by tileid->xy,
;; shown above. I'm not sure I'm happy with the final version, so I've

        sample (+ line index)]
    (vector line sample)))

;; ## Metadata Parsing

(defmapop
  #^{:doc "Generates metadata values for a given unpacked MODIS
Dataset and a seq of keys."}
  [meta-values [meta-keys]] [modis]
  (let [^Hashtable metadict (metadata modis)]
    (map #(.get metadict %) meta-keys)))

;; TODO -- add some good documentation here about what the next
;; section is accomplishing. I want to check marginalia to see the
;; best way to do this stuff.
