haskell - グロスを使用するときに原点を左上隅にする方法はありますか

Question

Glossを使用して Haskell で Asteroids クローンを作成しています。

画面右側で宇宙船が出たら左から戻ってくるようにしたいです。(0, 0)これは、原点が画面の中央にあるという事実によって、不必要に扱いにくくなっています。

原点を左上(または下)に移動する方法はありますか?

私のMainモジュール（とやり取りしている場所Gloss）は次のようになります。

module Main where

import           Graphics.Gloss    (Display (InWindow), black, play)

-- my own imported code
import           Assets            (loadAssets)
import           GameState         (defaultHeight, defaultWidth, initGameState)
import           HandleInput       (handleInput)
import           ProgressGameState (progressGameState)
import           Render            (render)

windowDisplay :: Display
windowDisplay = InWindow "Window" (defaultWidth, defaultHeight) (10, 10)

main :: IO ()
main = do
  assets <- loadAssets
  play
    windowDisplay
    black
    60
    initGameState
    (render assets)
    handleInput
    progressGameState