How to make AAA 3D games in Haskell

bf3.hs

import Game.AAAGameDevEnv (GameEngine (..), GameData (..))

main = frostbite $ bf3 

frostbite :: GameData -> GameEngine
frostbite game = Engine {
  version = 2.3.2,
  directX = yes,
  realLifePhysics = enabled,
  gameStuff = game
}
  
bf3 :: GameData
bf3 = do
  x <- diceDevelop "battlefield 3, plz!11!!1!!!"
  y <- publish eaGameMakesEverything x
  return y