anchor.diff:                              |> Seq.mapi (fun idx info -> (sprintf "%s_%i" info.Name idx) ) |> String.concat separator
                           // objects
                           | _ -> dataType.GetProperties()
  -                                |> Seq.map (fun info -> info.Name) |> String.concat separator
  +                               |> Seq.map (fun info -> info.Name) |> String.concat separator
                       yield header
  -
   
                   let lines =
                       match dataType with
  
positive.code:                         data |> Seq.map elemToStr
                       //tuple type
                      | ty when FSharpType.IsTuple ty ->
                          data |> Seq.map FSharpValue.GetTupleFields 
                          |> Seq.mapi (fun i value ->
                                          if i = 0 then
                                              (formatFunctionsFst separator value)value
  
negative.code: 
                          let stringFuncs =
                              let fstRecord = data |> Seq.head
                              let fieldTypes =
                                  fields
                                  |> List.map (fun field -> field fstRecord)
  
                              let rec loop n list =
  