anchor.diff:  let readArguments args =
       let parser = ArgumentParser.Create<CmdArguments>()
       try
  -        parser.Parse(args).GetAllResults() |> Some
  +        parser.Parse(args) |> Some
       with
       | :? ArgumentException ->
           parser.Usage() |> eprintfn "Usage:%s"
  
positive.code:                 | ArrType _      -> "set the type of airport for the arrival"
                  | Sort _         -> "specify how routes should be displayed"
                  | SortOrder _    -> "specifiy if you want routes displayed in ascending or descending order"
  
  let (|Time|_|) v =
      match TimeSpan.TryParse v with
  
negative.code:     | [<PrintLabels>] Max          of hours:string
      | [<PrintLabels>] ArriveBefore of hour:string
      | [<PrintLabels>] Arrival      of icao:string
      | DepCont    of string
      | ArrCont    of string
      | DepType    of string
      | ArrType    of string
      | Sort       of string
      | SortOrder  of string
      | AutoUpdate of bool
      with
          interface IArgParserTemplate with
              member s.Usage =
  