                          ["MYS" 830 0.7]
                          ["MYS" 831 0.9]
                          ["nil" 0 0]])))
-
-
-
-

        [forma.matrix.utils :only (transpose)]
        [forma.utils :only (positions)]
        [forma.date-time :only (period->datetime datetime->period)]
        [forma.trends.data :only (ndvi rain reli)])
  (:require [incanter.core :as i]
            [incanter.charts :as chart]
            [forma.testing :as t]

  the alert.  If the probability of clearing never exceeds the
  threshold, then a stand-in three-tuple is returned."
  [res out-m thresh]
  (let [series (grab-series out-m)
        idx (positions #(> % thresh) series)
        offset (end-training res)]
    (if (empty? idx)
