             [con-world.cell :as cell]
             [con-world.utils :as u]))
 
-(declare main-screen con-world)
+(declare main-screen con-world intro-screen game-over-screen)
 
 (defn in-rectangle? [{:keys [x y width height]} r]
   (and (rectangle! r :contains x y) (rectangle! r :contains (+ x width) (+ y height))))

           :on-render
           (fn [screen entities]
             (clear!)
             (->> entities
                  (step! screen)
                  (map set-enemy-in-zone)
                  (render! screen)))

           :on-key-down
           (fn [screen entities]

          (assoc entity :in-zone? true))
        entity))
    entity))

(defn game-over? [entities]
  (-> (cell/find-cell entities)
      :life
      (<= 0)))

(defscreen main-screen
           :on-show
