-- | Initial state to initiate the PrintS monad.
initPrintState :: PrintState
initPrintState = PrintState 0 id
initPrintState :: PrintState
initPrintState = PrintState 0 id
initPrintState = PrintState 0 id