    (m/norm-range (dec (count values)))
    values))
 
+;; Domain bounds
+
 (def domain-bounds-x #(gu/axis-bounds 0 %))
 
 (def domain-bounds-y #(gu/axis-bounds 1 %))

     (map (fn [spec] ((:layout spec) opts spec)) data)
     (if (:visible x-axis) (svg-x-axis-cartesian x-axis))
     (if (:visible y-axis) (svg-y-axis-cartesian y-axis)))))

(defn svg-x-axis-polar
  [{:keys [x-axis project circle origin]}]

                       label-style)
         :label-dist  (or label-dist (+ 10 major-size))))

;; Linear

(defn lin-tick-marks
  [[d1 d2] delta]
  (let [dr (- d2 d1)
