-- ---------------------------------------------------------------------

addOneParamCmdOpts :: Parser HareParams
addOneParamCmdOpts =
    AddOneParam
      <$> strArgument
            ( metavar "FILE"
           <> help "Specify Haskell file to process"
            )
      <*> strArgument
            ( metavar "NAME"
           <> help "The name for the parameter"
            )
      <*> argument auto
            ( metavar "line"
           <> help "The line the function name is on")
      <*> argument auto
            ( metavar "col"
           <> help "A col inside the function name name")
addOneParamCmdOpts :: Parser HareParams
addOneParamCmdOpts =
    AddOneParam
      <$> strArgument
            ( metavar "FILE"
           <> help "Specify Haskell file to process"
            )
      <*> strArgument
            ( metavar "NAME"
           <> help "The name for the parameter"
            )
      <*> argument auto
            ( metavar "line"
           <> help "The line the function name is on")
      <*> argument auto
            ( metavar "col"
           <> help "A col inside the function name name")
addOneParamCmdOpts =
    AddOneParam
      <$> strArgument
            ( metavar "FILE"
           <> help "Specify Haskell file to process"
            )
      <*> strArgument
            ( metavar "NAME"
           <> help "The name for the parameter"
            )
      <*> argument auto
            ( metavar "line"
           <> help "The line the function name is on")
      <*> argument auto
            ( metavar "col"
           <> help "A col inside the function name name")