Returns the screen map in screen-object.
screen-object
(s main-screen)
(defn s [screen-object] (-> screen-object :screen deref))