Haskell Gravity Worm Game