(ns charts
  (:refer-clojure :exclude [partition]) ;;avoid name conflict with base "partition" function
  (:use [c2.core :only [unify]]))

(def css (str "
              body { background-color:white;}
              .coordinate-axes line {stroke:black}
              .data line {stroke:black; stroke-width: 10px;}
              "
))


(let []
  [:svg [:style {:type "text/css"} (str "<![CDATA[" css "]]>")]
   [:g.plot
    [:g.coordinate-axes
       [:line {:x1 20 :y1 50 :x2 20 :y2 300}]
       [:line {:x1 20 :y1 300 :x2 620 :y2 300}]
     ]
    ]]
)