 
 (def default-font "72pt")
 
-(println "Hello mod!" (mod 10 7))
-
-(defn diagram-1 [data owner]
+(defn fig-put-and-take [data owner]
   [:div
    [:svg {:version "1.1" :width 800 :height 600}
-    ;;[:rect {:x 0 :y 0 :width 800 :height 600 :fill "#333"}]
 
     [:g {:transform "translate(70,65)"
          :onClick (fn [_]

             (apply vec content)
             )
           (when-let [code (:code data)]
             [:pre code]
             )
           #_(when (:custom data)
               [:svg {:version "1.1" :width 600 :height 600}

                      :width "100%"
                      :height "100%"}})

           (when-let [title (:title data)]
             [:h1 title]
             )

           (when-let [subtitle (:subtitle data)]
             [:h2 subtitle]
             )

           (when-let [builder (:builder data)]
             (builder data owner)
             )

           (when-let [event (:event data)]
             [:div {:style {:text-align "center" :margin-top "20pt"}}
              [:h3 event]
              [:h3 (:author data)]
              [:h3 (:company data)]
              [:h3 (:email data)]
              [:h3 (:twitter data)]
              ]
             )

           (when-let [bullets (:bullets data)]
             [:ul {:style {:font-size "42pt"}}
              (for [b bullets]
                [:li b]
                )]
             )

           #_[:p (:text data)]
