anchor.diff:          /// Convertes a generic sequence to a sequence of seperated string
           /// use write afterwards to save to file
   
  -        static member inline CSVwith (separator: string) (valFunc: 'a -> ('a -> obj)[]) (strFunc:string -> bool -> obj -> (obj -> string)) (header: bool) (flatten: bool) (data: seq<'a>)=
  +        static member inline CSVwith (valFunc: 'a -> ('a -> obj)[]) (strFunc:string -> bool -> obj -> (obj -> string)) (separator: string) (header: bool) (flatten: bool) (data: seq<'a>)=
               
               let inline toPrettyHeaderString sep input fieldName flatten =
                   let o = box input
  
positive.code:                     sb.Append x |> ignore
                      let res = sb.ToString()
                      sb.Clear() |> ignore
                      res
negative.code:             }
  
          
          static member inline valueFunction (dataEntry: 'a) =
          
              let dataType = typeof<'a>
          
  