runApp :: Env -> State -> IO ()
runApp env state = void $ runRST run env state
runApp :: Env -> State -> IO ()
runApp env state = void $ runRST run env state
runApp env state = void $ runRST run env state