 (ns clj-simple-chart.ncs.discovery
   (:require [clj-simple-chart.csv.csvmap :as csv]
             [clj-http.client :as client]
+            [clojure.set :refer [rename-keys]]
             [clj-simple-chart.ncs.resource :as resource]
             [clj-simple-chart.ncs.reserve :as reserve]
             [clojure.test :as test]))

                 (csv/number-or-throw-columns [:fldRecoverableLiquids :fldRecoverableGas])
                 (sort-by :name)
                 (vec)))

                 (distinct)
                 (vec))))

(def status-map {"Approved for production" :pdo-approved
                 "Producing" :producing
                 "Production in clarification phase" :clarification
                 "Production likely, but unclarified" :likely
                 "Production not evaluated" :not-evaluated
                 "Shut down" :shut-down})

(defn recoverable [{fld-name :fldName dsc-name :dscName} kind]
  (if (and (some? fld-name) (some #{fld-name} reserve/field-names-all))
      (reserve/get-reserve fld-name kind)
