   (dotimes [n vertical-lines] (.log js/console "Index: " n)
            (draw-line (+ x1 (* n 100)) y1 (+ x2 (* n 100)) y2)))
 
-
 (fill-rect 1440 20 40 100 "red")
 (fill-rect 1440 120 40 100 "orange")
 (fill-rect 1440 220 40 100 "#F5D282")

(fill-rect 1440 420 40 100 "#B1D8FA")
(fill-rect 1440 520 40 100 "#3874A8")
(fill-rect 1440 620 40 100 "#7D4BBF")


(write-text-s1-black "DE" 1450 74)
(write-text-s1-black "LT" 1450 174)

            [om.dom :as dom :include-macros true]))

(enable-console-print!)

(def canvas (.getElementById js/document "myCanvas"))
(def ctx (.getContext canvas "2d"))
