*slime-repl clojure*

user> (pprint (macroexpand-1 '(bar-chart (map (comp str first) d) (map (comp #(/ % 1000.0) second) d) :title "Distance by week" :x-label "Week" :y-label "km")))
(clojure.core/let
 [opts__1904__auto__
  (clojure.core/when
   '(:title "Distance by week" :x-label "Week" :y-label "km")
   (clojure.core/assoc
    {}
    :title
    "Distance by week"
    :x-label
    "Week"
    :y-label
    "km"))
  values__1905__auto__
  (if
   (incanter.core/matrix?
    (map (comp (fn* [p1__2908] (/ p1__2908 1000.0)) second) d))
   (incanter.core/to-list
    (map (comp (fn* [p1__2908] (/ p1__2908 1000.0)) second) d))
   (map (comp (fn* [p1__2908] (/ p1__2908 1000.0)) second) d))
  main-title__1906__auto__
  (clojure.core/or (:title opts__1904__auto__) "Bar Chart")
  group-by__1907__auto__
  (:group-by opts__1904__auto__)
  x-label__1908__auto__
  (clojure.core/or (:x-label opts__1904__auto__) "Categories")
  y-label__1909__auto__
  (clojure.core/or (:y-label opts__1904__auto__) "Value")
  vertical?__1910__auto__
  (if (clojure.core/false? (:vertical opts__1904__auto__)) false true)
  legend?__1911__auto__
  (clojure.core/true? (:legend opts__1904__auto__))
  dataset__1912__auto__
  (org.jfree.data.category.DefaultCategoryDataset.)
  chart__1913__auto__
  (org.jfree.chart.ChartFactory/createBarChart
   main-title__1906__auto__
   x-label__1908__auto__
   y-label__1909__auto__
   dataset__1912__auto__
   (if
    vertical?__1910__auto__
    org.jfree.chart.plot.PlotOrientation/VERTICAL
    org.jfree.chart.plot.PlotOrientation/HORIZONTAL)
   legend?__1911__auto__
   true
   false)]
 (do
  (clojure.core/doseq
   [i__1914__auto__
    (clojure.core/range 0 (clojure.core/count values__1905__auto__))]
   (.addValue
    dataset__1912__auto__
    (clojure.core/nth values__1905__auto__ i__1914__auto__)
    (if
     group-by__1907__auto__
     (clojure.core/nth group-by__1907__auto__ i__1914__auto__)
     (clojure.core/str
      '(map (comp (fn* [p1__2908] (/ p1__2908 1000.0)) second) d)))
    (clojure.core/nth (map (comp str first) d) i__1914__auto__)))
  chart__1913__auto__))
nil