clearF :: XCommandT
clearF =
  XCommandT "Console.clearF" (do
    text <- io $ MSV.replicate Constants.conTextSize ' '
    globals.gCon.cText .= text
  )
clearF :: XCommandT
clearF =
  XCommandT "Console.clearF" (do
    text <- io $ MSV.replicate Constants.conTextSize ' '
    globals.gCon.cText .= text
  )
clearF =
  XCommandT "Console.clearF" (do
    text <- io $ MSV.replicate Constants.conTextSize ' '
    globals.gCon.cText .= text
  )