anchor.diff:  
   let typeName = function
     | String | Any -> "string"
  -  | OneZero | Bool -> "bool"
  +  (*| OneZero *)| Bool -> "bool"
     | Date _ -> "date"
     | Number -> "number"
   
  
positive.code: 
  type InferredType =   
    | Any | String | Number 
    | OneZero | Bool 
    | Date of System.Globalization.CultureInfo
  
  let tryDate culture s = 
  
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
  