            :viewBox (str "0 0 100% " h)
    :style {:outline "2px solid black"
            :background-color "#eee"}}
+     (button "Hold" [295 34])
+     (button ":saw" [405 34])
+     (button ":square" [460 34])
+     (button ":sine" [515 34])
+     (button ":triangle" [570 34])
+
+
      (map #(accordion-group shape %) accord/stradella-bass) ])
 
 ;; -------------------------


(defn accordion-group [shape note-group]
  (let [{notes :notes heading :text row :row} note-group
        y-start-pos 43
        x-start-pos 33
        hy (+ x-start-pos (* row 27))
        hx (+ y-start-pos (* row 48))]

   [:div
    [svg-piano-keyboard2 150 2000]

    [svg-accordion [370 2000] "hexagon"]
    ;;[svg-accordion [320 1250] "circle"]
    [svg-piano-keyboard 150 2000]
    ;;[svg-inkscape-hexagons 250 500]
    ]])
