anchor.diff:    { Name : string 
       UrlName : string
       Comment : Comment 
  +    Assembly : AssemblyName
   
       UnionCases : Member list
       RecordFields : Member list
  
positive.code:     ValuesAndFuncs : Member list
      TypeExtensions : Member list
      ActivePatterns : Member list }
    static member Create(name, url, comment, modules, types, vals, exts, pats) = 
      { Module.Name = name; UrlName = url; Comment = comment;
        AllMembers = List.concat [ vals; exts; pats ] 
        NestedModules = modules; NestedTypes = types
        ValuesAndFuncs = vals; TypeExtensions = exts; ActivePatterns = pats }
  
negative.code:         usedNames.Add(found, true)
          found
        { PublicOnly=publicOnly;
          Assembly = assembly
          XmlMemberMap = map; 
          MarkdownComments = markDownComments; 
          UniqueUrlName = nameGen; 
  