                      :x      xx
                      :y      yy}))
 
-(def txt {"OTHERS"            (str "Alle andre "
-                                   (count datasource/reserve-field-names)
-                                   " felt")
-          "OTHERS_PRE_1990"   (str "Andre felt funne før 1990")
-          "OTHERS_POSTE_1990" (str "Andre felt funne 1990–2000")
-          "OTHERS_POSTE_2000" (str "Andre felt funne f.o.m. 2000")
-          "JOHAN CASTBERG"    "Johan Castberg"
-          "JOHAN SVERDRUP"    "Johan Sverdrup"
-          "HEIDRUN"           "Heidrun"
-          "ÅSGARD"            "Åsgard"
-          "OSEBERG"           "Oseberg"
-          "TROLL"             "Troll"
-          "SNORRE"            "Snorre"
-          "GULLFAKS"          "Gullfaks"
-          "VALHALL"           "Valhall"
-          "STATFJORD"         "Statfjord"
-          "EKOFISK"           "Ekofisk"})
-
-(def cat-to-value-last-year (->> data
-                                 (filter #(= (:year %) max-year))
-                                 (map (juxt :c :value))
-                                 (into {})))
-
 (defn diagram []
   [:svg {:xmlns "http://www.w3.org/2000/svg" :width svg-width :height svg-height}
    [:g {:transform (translate marg marg)}

         :orientation   :bottom
         :tick-values   (vec (distinct (flatten [(first x-domain)
                                                 (range 1970 2017 5)])))
         ;(last x-domain)])))
         :tick-format   (fn [x] (cond (= x 1967) "67"
                                      (= x 2017) "17"
                                      :else x))

             "OSEBERG"           cyan
             "ÅSGARD"            hydro-blue
             "HEIDRUN"           "#bcbd22"
             "OTHERS_PRE_1990"   "#969696"
             "OTHERS_POSTE_1990" "#a1d99b"
             "OTHERS_POSTE_2000" "rgb(231, 186, 82)"
             "JOHAN SVERDRUP"    dark-purple
             "JOHAN CASTBERG"    pink})

(def txt {"OTHERS_PRE_1990"   (str "Andre felt funne før 1990")
          "OTHERS_POSTE_1990" (str "Andre felt funne 1990–2000")
          "OTHERS_POSTE_2000" (str "Andre felt funne f.o.m. 2000")
          "JOHAN CASTBERG"    "Johan Castberg"
          "JOHAN SVERDRUP"    "Johan Sverdrup"
          "HEIDRUN"           "Heidrun"
          "ÅSGARD"            "Åsgard"
          "OSEBERG"           "Oseberg"
          "TROLL"             "Troll"
          "SNORRE"            "Snorre"
          "GULLFAKS"          "Gullfaks"
          "VALHALL"           "Valhall"
          "STATFJORD"         "Statfjord"
          "EKOFISK"           "Ekofisk"})

(def marg 10)
(def two-marg (* 2 marg))
