                                                         samples-per-plot
                                                         sample-resolution))
                              "Error adding plot file with generated samples."))
-        ;; The SQL function only checks against plots with external tables.
+          ;; The SQL function only checks against plots with external tables.
           (when (not allow-drawn-samples?)
             (let [bad-plots (map :plot_id (call-sql "plots_missing_samples" project-id))]
               (when (seq bad-plots)

  [project-id]
  (->> (call-sql "get_plot_headers" project-id)
       (map :column_names)
       (remove #(#{"GID", "GEOM", "PLOT_GEOM", "LAT", "LON"} (str/upper-case %)))
       (mapv #(str "pl_" %))))

(def plot-key-names {:lon        :center_lon

  [project-id]
  (->> (call-sql "get_sample_headers" project-id)
       (map :column_names)
       (remove #(#{"GID" "GEOM" "LAT" "LON" "SAMPLE_GEOM"} (str/upper-case %)))
       (map #(str "smpl_" %))))

(defn- extract-answers [value sample-value-trans]
