anchor.diff:  
   type NewProjectArgs =
       | [<CLIAlt "-n">] Name of string
  -    | [<CLIAlt "dir">] Folder of string
  +    | [<CLIAlt "dir">][<CLIAlt "--dir">] Folder of string
       | [<CLIAlt "-t">] Template of string
       | No_Paket
       | No_Fake
  
positive.code:     | [<First>][<CLIAlt "-p">] Project of string
      | [<First>][<CLIAlt "-s">] Solution of string
      | [<CLIAlt "-n">] Name of string
      | [<CLIAlt "dir">] Folder of string
      | [<CLIArg "--build-action">] [<CLIAlt "-ba">] BuildAction of string
      | [<CLIArg "--above">] [<CLIAlt "-a">] Above of string
      | [<CLIArg "--below">] [<CLIAlt "-b">] Below of string
  
negative.code:     | [<First>][<CLIArg "file">] File
      | [<First>][<CLIArg "reference">] Reference
      | [<First>][<CLIArg "project">] Project
      | [<First>][<CLIArg "folder">][<CLIAlt "dir">][<CLIAlt "--dir">] Folder
  
      interface IArgParserTemplate with
          member this.Usage =
  