--(((createGameObjectImgObject (-475,330-i*40) (30,40) orangeLife): lives1),((createGameObjectImgObject (475,330-i*40) (30,40) greenLife): lives2))

main :: IO ()
main = Game.play
           window
           background
           fps
           initialWorld
           render
           processEvent
           [update]
main :: IO ()
main = Game.play
           window
           background
           fps
           initialWorld
           render
           processEvent
           [update]
main = Game.play
           window
           background
           fps
           initialWorld
           render
           processEvent
           [update]