anchor.diff:              ctx.Writer.WriteLine(usage)
               ctx.Writer.Indent ctx.Indentation
               match getParamArgs argInfos with
  -            | "" ->
  +            | "", _ ->
                   ctx.Writer.WriteLine("with get (): {0} = ", retType)
  -            | args ->
  +            | args, _ ->
                   ctx.Writer.WriteLine("with get {0}: {1} = ", args, retType)
               ctx.Writer.Indent ctx.Indentation
               for line in ctx.MethodBody do
  
positive.code:             ctx.Writer.WriteLine(usage)
              ctx.Writer.Indent ctx.Indentation
              match getParamArgs argInfos with
              | "" | "()" ->
                  ctx.Writer.WriteLine("with set (v: {0}): unit = ", retType)
              | args ->
                  ctx.Writer.WriteLine("with set {0} (v: {1}): unit = ", args, retType)
              ctx.Writer.Indent ctx.Indentation
              for line in ctx.MethodBody do
                  ctx.Writer.WriteLine(line)
  
negative.code:             | args when isItemIndexer -> String.concat tupSep args
              | args -> bracket (String.concat tupSep args))
          |> String.concat argSep
          , namesWithIndices
    
      let internal formatMember (ctx: Context) (v: FSharpMemberFunctionOrValue) = 
          let getParamArgs (argInfos: FSharpParameter list list) = 
              let args, namesWithIndices =
                  match argInfos with
                  | [[x]] when v.IsGetterMethod && x.Name.IsNone 
                               && x.Type.TypeDefinition.XmlDocSig = "T:Microsoft.FSharp.Core.unit" -> 
                      "", Map.ofList [ctx.ObjectIdent, Set.empty]
                  | _  -> formatArgsUsage ctx true v argInfos
               
              if String.IsNullOrWhiteSpace(args) then "" 
              elif args.StartsWith("(") then args
              else sprintf "(%s)" args
              , namesWithIndices
  
          let buildUsage argInfos = 
              let parArgs, _ = getParamArgs argInfos
              match v.IsMember, v.IsInstanceMember, v.LogicalName, v.DisplayName with
              // Constructors
              | _, _, ".ctor", _ -> "new" + parArgs
  