anchor.diff:      let Node =
           Class "Node"
           |=> Inherits EventTarget
  +        |+> Static [
  +                "ELEMENT_NODE" =? T<int>
  +                "ATTRIBUTE_NODE" =? T<int>
  +                "TEXT_NODE" =? T<int>
  +                "CDATA_SECTION_NODE" =? T<int>
  +                "ENTITY_REFERENCE_NODE" =? T<int>
  +                "ENTITY_NODE" =? T<int>
  +                "PROCESSING_INSTRUCTION_NODE" =? T<int>
  +                "COMMENT_NODE" =? T<int>
  +                "DOCUMENT_NODE" =? T<int>
  +                "DOCUMENT_TYPE_NODE" =? T<int>
  +                "DOCUMENT_FRAGMENT_NODE" =? T<int>
  +                "NOTATION_NODE" =? T<int>
  +
  +                "DOCUMENT_POSITION_DISCONNECTED" =? T<int>
  +                "DOCUMENT_POSITION_PRECEDING" =? T<int>
  +                "DOCUMENT_POSITION_FOLLOWING" =? T<int>
  +                "DOCUMENT_POSITION_CONTAINS" =? T<int>
  +                "DOCUMENT_POSITION_CONTAINED_BY" =? T<int>
  +                "DOCUMENT_POSITION_IMPLEMENTATION_SPECIFIC" =? T<int>
  +            ]
           |+> Instance [
                   "attributes" =@ NamedNodeMap
                   "baseURI" =? T<string>
  
positive.code:                 "setNamedItemNS" => Attr ^-> Attr
                  "removeNamedItemNS" => GetNS ^-> Attr
              ]
  
      let Element =
          Element
  
negative.code:     let DOMLocator = Class "DOMLocator"
      let Event = Class "Event"
      let AbstractView = Class "AbstractView"
      let NodeFilter = Class "NodeFilter"
      let NodeIterator = Class "NodeIterator"
      let ShadowRoot = Class "ShadowRoot"
      let TreeWalker = Class "TreeWalker"
      let DocumentFragment = Class "DocumentFragment"
  
  [<AutoOpen>]
  module private Enumerations =
  