anchor.diff:          { Id = fbr.GetStringValWithKey("/type/object/id") 
             Name = fbr.GetStringValWithKey("/type/object/name") 
             Domains = fbr.GetArrayValWithKey("/freebase/domain_category/domains") |> Array.map FreebaseDomainId.FromJson }
  +    override x.ToString() = x.Name
   
   type DocumentationById = 
       { Id:string
  
positive.code:           DomainName = fbr.GetStringValWithKey("/type/object/name") 
            NamespaceKinds = fbr.GetArrayValWithKey("/type/object/type") |> Array.map (fun j -> j.AsString())
            Hidden = fbr.GetStringValWithKey("/freebase/domain_profile/hidden") }
  
  type FreebaseNamespaceKey = 
      { Value:string
  
negative.code:     static member FromJson(fbr:JsonValue) = 
          { Id = fbr.GetStringValWithKey("/type/object/id")
            DomainName = fbr.GetStringValWithKey("/type/object/name")  }
      override x.ToString() = x.DomainName
  
  type FreebaseProperty = 
      { Id:string
  