                  "Filters out reliability with VCF < 25"
                  (?- (hfs-seqfile reli-path)
                      (mk-filter static-path (hfs-seqfile reli-seq-path))))
-              
+
               rain-filter
               ([:tmp-dirs rain-path]
                  "Filters out rain with VCF < 25, before stretching rain ts"

                                      est-map
                                      (hfs-seqfile cleanup-path)
                                      (hfs-seqfile adjusted-fire-path))))
              
              final-forma
              ([:tmp-dirs final-path]
                 "Process neighbors"

                     (hfs-seqfile "/mnt/hgfs/Dropbox/yikestimes"))))))

(defmain simplerunner
  [tmp-root pail-path ts-pail-path out-path run-key est-end]
  (let [{:keys [s-res t-res est-end] :as est-map} (forma-run-parameters run-key est-end)
        mk-filter (fn [vcf-path ts-src]
                    (forma/filter-query (hfs-seqfile vcf-path)
                                        (:vcf-limit est-map)
