appSurface :: App -> ScreenSurface
appSurface app = screenSurface $ appScreen app
appSurface :: App -> ScreenSurface
appSurface app = screenSurface $ appScreen app
appSurface app = screenSurface $ appScreen app