anchor.diff:  
       writer.Indent insertionParams.IndentColumn
   
  -    let writePipeBefore = entity.UnionCases.Count >= 2
  -
       casesToWrite
  -    |> Seq.iter (formatCase ctxt writePipeBefore)
  -    
  -    // Scenario when first case doesn't start with pipe
  -    // match x with Case3 -> ()
  -    //              ^
  -    //
  -    // match x with Case1 -> ()
  -    //              | Case3 -> () 
  -    //                ^
  -    //
  -    // match x with Case1 -> ()
  -    //              | Case2 -> ()
  -    //              | Case3 -> ()
  -    //                ^
  +    |> Seq.iter (formatCase ctxt)
   
       writer.Dump()
  
positive.code: 
  let private UnnamedFieldRegex = Regex("^Item[\d+]?$", RegexOptions.Compiled)
  
  let private formatCase (ctxt: Context)
      writePipeBefore (case: FSharpUnionCase) =
      let writer = ctxt.Writer
      let name = 
          if ctxt.RequireQualifiedAccess then
  
negative.code:             |> sprintf "(%s)"
      
      writer.WriteLine("")
      writer.Write("| {0}{1} -> {2}", name, paramsPattern, ctxt.CaseDefaultValue)
  
  let formatMatchExpr insertionParams (caseDefaultValue: string)
                      (patMatchExpr: PatternMatchExpr) (entity: FSharpEntity) =
  