 (defn fib-step
   [{:keys [step-num] :as params}]
   (cpu-delay step-num)
+  (+)
   [(< step-num 10)
    (assoc params :step-num (inc step-num))])
 


(defn demo1
  []
  (let []
    ;; Modal component

    [:div.container
     {:style {:width "100%" :margin-top "20px" :margin-left "0px" :margin-right "0px"}}
     [:div.row

            [:p (str "Saving '" path "'...")]
            [:div {:style {:display "flex"}}
             [:div {:style {:margin "auto"}}
              [:img {:src "resources/img/spinner.gif" :style {:margin-right "12px"}}]
              [button
               :label    "STOP!"
               :on-click #(reset! writing? false)
