anchor.diff:    | Any, t | t, Any -> t
     | Date c, Date null | Date null, Date c -> Date c
     | Date c1, Date c2 when c1 = c2 -> Date c1
  -  | Bool, OneZero | OneZero, Bool -> Bool
  -  | Number, OneZero | OneZero, Number -> Number
  +  //| Bool, OneZero | OneZero, Bool -> Bool
  +  //| Number, OneZero | OneZero, Number -> Number
     | _ -> String
   
   let readCsvFile (data:string) =   
  
positive.code:           | Number -> col, Value.Number(Double.Parse value)
            | Date null -> col, Value.Date(DateTimeOffset.Parse(value, ddmm))
            | Date c -> col, Value.Date(DateTimeOffset.Parse(value, c))
            | OneZero | Bool -> 
                let b = 
                  if value.ToLower() = "true" then true
                  elif value.ToLower() = "false" then false
  
negative.code: let inferType (s:string) =
    if fst (Decimal.TryParse(s)) then 
      let d = Decimal.Parse(s)
      //if d = 1M || d = 0M then OneZero else 
      Number
    elif tryDate mmdd s && tryDate ddmm s then Date null
    elif tryDate mmdd s then Date mmdd
    elif tryDate ddmm s then Date ddmm
  