anchor.diff:          ]
   
       let TreemapMode =
  -        Pattern.EnumStrings "TreemapMode" [
  +        EnumStrings "TreemapMode" [
               "squarify"
               "slice"
               "dice"
               "slice-dice"
           ]
  -        |>! addToClassList
   
       let Treemap =
           ChainedClassNew "Treemap" <| fun chained ->
  
positive.code:         ]
  
      let SymbolType =
          Pattern.EnumStrings "SymbolType" [
              "circle"
              "cross"
              "diamond"
  
negative.code:             convName   => O ^-> convType
              "toString" => O ^-> String
          ]
          |>! addToClassList
  
      let Hsl = ColorType "hsl" "rgb" Rgb
      let Lab = ColorType "lab" "rgb" Rgb
  