add Argu for cli args

Program.fs

@@ -1,7 +1,16 @@
 open System.IO
+open Argu
+
+type CLIArguments =
+    | Bin
+with
+    interface IArgParserTemplate with
+        member s.Usage =
+            match s with
+            | Bin _ -> "remove also bin directories."
+
+let removeobjs () =
 
-[<EntryPoint>]
-let main _ =
     try
         let dir = Directory.GetCurrentDirectory()
 
@@ -19,3 +28,23 @@ let main _ =
     | ex ->
         printfn "%s" ex.Message
         -1
+
+[<EntryPoint>]
+let main argv =
+    try
+        let parser = ArgumentParser.Create<CLIArguments>(programName = "removeobj")
+
+        let results = parser.Parse argv
+
+        let andBin = results.Contains Bin
+
+        removeobjs ()
+    with
+    | :? ArguParseException as ex ->
+        printfn "%s" ex.Message
+        match ex.ErrorCode with
+        | ErrorCode.HelpText -> 0
+        | _ -> -2
+    | ex ->
+        printfn "%s" ex.Message
+        -3

removeobj.fsproj

@@ -18,4 +18,8 @@
     <Compile Include="Program.fs" />
   </ItemGroup>
 
+  <ItemGroup>
+    <PackageReference Include="Argu" Version="5.1.0" />
+  </ItemGroup>
+
 </Project>