                                    :2014     [#(if (nil? %) 0 (quot (read-string %) 100)) :importo_2014]
                                    :siope    [read-string :codice_siope]
                                 ;; :uscita   [#(if (nil? %) 0 (/ (read-string %) 100)) :imp_uscite_att]
-                                   :desc     :descrizione_codice
+                                   :desc     [#(dammi-codice-uscita % :descrizione) :codice_siope]
                                    } dati)]
     (huri/select-cols colonne rilievo))
   )

  (:import (org.apache.commons.compress.compressors.xz XZCompressorInputStream))
  )

(defn apri-csv-xz
  "apri un file singolo compresso con xz, restituisce io/reader"
  [filename]
  (with-open [in-file (-> filename
                          io/file
                          io/input-stream
                          (XZCompressorInputStream. true)
                          io/reader)]
    (doall (csv/read-csv in-file)))
  )

(defn analizza-dati [dati]
  (let [colonne [:2016 :2015 :2014 :siope :desc]

              :columns (some keys dati))
  )

(defn leggibile
  "prende un numero e restituisce una stringa leggibile"
  [num]
  (cond
    (nil? num) "zero"
    (< num 1) "zero"
