anchor.diff:  
       type HtmlNode with
                  
  -        /// <summary>
           /// Gets the given nodes name
  -        /// </summary>
  -        member x.Name with get() = HtmlNode.name x 
  +        member x.Name = HtmlNode.name x 
           
  -        /// <summary>
           /// Gets all of the nodes immediately under this node
  -        /// </summary>           
  -        member x.Children with get() = HtmlNode.children x
  -
  -        /// <summary>
  +        member x.Children = HtmlNode.children x
  +
           /// Gets the parent node of this node
  -        /// </summary>
  -        member x.Parent with get() = HtmlNode.parent x
  +        member x.Parent = HtmlNode.parent x
   
           /// <summary>
           /// Gets all of the descendants of the current node
  
positive.code: 
  [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
  module HtmlAttribute = 
      ///<summary>
      ///Gets the name of the given attribute
      /// </summary>
      let name = function
          | HtmlAttribute(name = name) -> name
  
      ///<summary>
      ///Gets the values of the given attribute
      /// </summary>
      let value = function
          | HtmlAttribute(value = value) -> value   
  
      ///<summary>
      ///Parses the value of the attribute using the given function
      /// </summary>
      let parseValue parseF attr = 
          value attr |> parseF
  
      ///<summary>
      ///Attempts to parse the value of the attribute using the given function
      ///if the parse functions fails the defaultValue is returned
      /// </summary>
      let tryParseValue defaultValue parseF attr = 
          match value attr |> parseF with
          | true, v -> v
  
negative.code:         | Some(v) -> v
          | None -> failwithf "Unable to find attribute (%s)" name
  
      /// <summary>
      /// Returns true id the current node has an attribute that
      /// matches both the name and the value
      /// </summary>
      /// <param name="name">The name of the attribute</param>
      /// <param name="value">The value of the attribute</param>
      /// <param name="x">The given html node</param>
      let hasAttribute name (value:string) x = 
          tryGetAttribute name x
          |> function 
              | Some(attr) ->  attr.Value().ToLowerInvariant() = (value.ToLowerInvariant())
              | None -> false
  
      /// <summary>
      /// Returns the elements under the current node that mach the
      /// given predicate
      /// </summary>
      /// <param name="f">The predicate to match the element</param>
      /// <param name="x">The given html node</param>    
      let elements f x = 
          [
              for element in children x do
  