(defn
init-example
[#?(:clj window :cljs card)]
#?(:clj (assoc (c/->game window) :tex-count textures :total-time 0 :delta-time 0) :cljs (do (when-let [canvas (.querySelector card "canvas")] (.removeChild card canvas)) (let [canvas (doto (js/document.createElement "canvas") (-> .-style .-width (set! "100%")) (-> .-style .-height (set! "100%"))) context (.getContext canvas "webgl2")] (.appendChild card canvas) (assoc (c/->game context) :total-time 0 :delta-time 0)))))