-- Helper Functions

withInfo
  :: Parser a
  -> String
  -> ParserInfo a
withInfo opts desc = info (helper <*> opts) $ progDesc desc
withInfo
  :: Parser a
  -> String
  -> ParserInfo a
withInfo opts desc = info (helper <*> opts) $ progDesc desc
withInfo opts desc = info (helper <*> opts) $ progDesc desc