         file-two (File. "two.png")]
     (ImageIO/write page-one "png" file-one)
     (ImageIO/write page-two "png" file-two)
+    (threshold "one.png")
+    (threshold "two.png")
     (loop [idx 0
            records []]
       (if-let [record (try

(ns tax-extractor.core
  (:import [net.sourceforge.tess4j Tesseract]
           [org.ghost4j.document PDFDocument]
           [org.ghost4j.renderer SimpleRenderer]

        :reportable-external-comp (parse-comp (doocr (reportable-external-comp y-off)))
        :other-comp (parse-comp (doocr (other-comp y-off)))))))

(defn threshold [filename]
  (sh "convert" filename "-threshold" "75%" filename))

(defn read-pdf [pdf]
  (let [doc (doto (PDFDocument.)
