module Render ( render
              ) where


import Game

import Control.Monad.State
import Graphics.Rendering.OpenGL.GL.Framebuffer (clear, ClearBuffer(..))


render :: Game ()
render = do
  liftIO $ clear [ColorBuffer]