 
                  :soft-drop false
 
-                 :game-over false
+                 :quit false
                  :quit-chan (chan)}))
 
 ; required for pausing/resuming the gravity routine


(defn cleanup []

  ; Create new quit channel (used to stop go-blocks)
  (close! (:quit-chan @state))

  )

              ; force gravity to reset
              (put! pause-grav 0)
              (put! resume-grav 0)
              (recur))))))

    ; Remove key events when quitting
    (go
      (<! (:quit-chan @state))
      (.removeEventListener js/window "keydown" key-down)
      (.removeEventListener js/window "keyup" key-up))))

;;------------------------------------------------------------
;; Opponent drawing
