my first haskell function! (remapped screen switching/shifting)