 (def height (* 8 unit-pixels))
 (def minkowski-order 2.0)
 (def minkowski-distance (distance/minkowski minkowski-order))
-(def circles [])
+(def isoquants [])
 (def mouse-point [0 0])
 
 

  (do
    (.clearRect drawing 0 0 (aget canvas "width") (aget canvas "height"))
    (draw-coordinates)
    (doall (for [circle circles] (draw-circle circle)))
    (draw-mouse-point)))

(defn request-frame []

    (.closePath drawing)
    (.restore drawing)))

(defn draw-isoquant [isoquant]
  (do
    (.save drawing)
    (.beginPath drawing)
    (doall (for [point isoquant] (let [[x y] (canvas-point point)] (.lineTo drawing x y))))
    (.closePath drawing)
    (.setLineDash drawing (array 3 5))
    (aset drawing "strokeStyle" "gray")
