     (set-stroke-style ctx :frame)
     (draw-line ctx [ 0.5 0.5 ] [ 0.5 (- h 0.5) ] )))
 
-(defn draw [ ctx w h data begin-t end-t]
+(defn draw [ ctx w h data begin-t end-t ]
   (draw-series-background ctx w h)
   (let [w (- w y-axis-space tsplot-right-margin)
         h (- h x-axis-space)]

            (map #(* % (.pow js/Math 10 scale))
                 [ 1 2 5 ]))
          (range -3 3)))

(def stroke-styles
  {:grid

    (aset ctx "font" "12px Arial")
    (let [y-range (rescale-range (s-yrange data) 1.1)]
      (unless (empty? data)
        (draw-y-grid ctx w h y-range)
        (draw-x-grid ctx w h x-range)
        (with-preserved-ctx ctx
          (clip-rect ctx 0 0 w h)
          (draw-series-line ctx data x-range y-range w h)))))) 

(defn draw-series-background [ ctx w h ]
  (with-preserved-ctx ctx
