estado.hs

-- Notar que Haskell não usa parênteses pra chamar funções, então `f a b` seria `f(a, b)` em 
-- outras linguagens

-- suponhamos um joguinho estilo space invaders
-- aí em cada frame você verifica se uma bala tá colidindo com algum inimigo
-- e se tiver colisões isso causa atualizações específicas do estado
evalFrame gameState =
  case getBulletCollisions gameState of
    [] -> continueEvalFrame gameState -- lista vazia, nenhuma colisão, só executamos outros updates
    collisions -> 
      -- na linha abaixo a gente atualizaria o estado com os efeitos das colisões
      let collisionState = updateWithCollisions collisions gameState
      in continueEvalFrame collisionState