    :t-stat     "t-statistic for the relevant month."})
 
 (defn forma-value
+  "FORMA object containing various characteristics of pixel timeseries
+
+   Example:
+  (forma-value {:temp-330 1, :conf-50 0, :both-preds 3, :count 4}
+               -2.7
+               -1.2
+               1.725)
+
+  {:fire-value
+    {:count 4, :conf-50 0, :temp-330 1, :both-preds 3},
+   :short-drop -2.7,
+   :long-drop -1.2,
+   :t-stat 1.725}"
   [fire short long t-stat]
   {:fire-value (or fire (fire-value 0 0 0 0))
    :short-drop short

   :line  "Line (row) within modis tile."})

(defn pixel-location
  [spatial-res mod-h mod-v sample line]
  {:spatial-res spatial-res
   :mod-h       mod-h

(defn combine-neighbors
  "Returns a new forma neighbor value generated by merging together
   each entry in the supplied sequence of forma values."
  ;; TODO: come up with an example
  [[x & more]]
  (if x
    (reduce merge-neighbors (neighbor-value x) more)
