       (loop [recs (bufiles/read-fqrecs inf rec-chunk-size)]
         (if (not (seq recs))
           :done
-          (let [recs (r/fold
+          (let [no-barcodes-bcs (keys ot-fq-map)
+                recs (r/fold
                       partition
                       (fn([] [])
                         ([V v]



(defn split-filter-fastqs
  [eid sqxform-fn & {:keys [baseqc% sqc%]
                     :or {baseqc% 0.96 sqc% 0.97}}]

  (let [base (get-exp-info eid :base)
        exp-illumina-xref (get-exp-info eid :exp-illumina-xref)
        illumina-sample-xref (get-exp-info eid :illumina-sample-xref)
        barcode-maps (get-exp-info eid :barcode-maps)

                 file-groups)))))

(defn split-barcodes
  [in-fq sqxform-fn ot-fq-map
   no-barcodes? barcodes-map other-barcodes
   qc-ctpt sqc%]

  (letio [bclen (->> ot-fq-map keys first count long)
          inf (io/open-streaming-gzip in-fq :in)
