anchor.diff:  
           let blurbOfId id = fbSchema.GetBlurbById id |> String.concat " "  
   
  -        let createDataContext = fbRuntimeInfo.FreebaseDataContextType.GetMethod("_Create")
  -        let getDomainCategoryById = fbRuntimeInfo.FreebaseDataContextType.GetMethod("_GetDomainCategoryById")
  -        let getDomainById = fbRuntimeInfo.FreebaseDomainCategoryType.GetMethod("_GetDomainById")
  -        let getObjectsOfTypeId = fbRuntimeInfo.FreebaseDomainType.GetMethod("_GetObjectsOfTypeId")
  -        let getIndividualsObject = fbRuntimeInfo.FreebaseIndividualsType.GetMethod("_GetIndividualsObject")
  -        let getIndividualById = fbRuntimeInfo.FreebaseIndividualsType.GetMethod("_GetIndividualById")
  +        let createDataContext = fbRuntimeInfo.FreebaseDataContextType.GetMethod "_Create"
  +        let getDomainCategoryById = fbRuntimeInfo.IFreebaseDataContextType.GetMethod "GetDomainCategoryById"
  +        let getDomainById = fbRuntimeInfo.IFreebaseDomainCategoryType.GetMethod "GetDomainById"
  +        let getObjectsOfTypeId = fbRuntimeInfo.IFreebaseDomainType.GetMethod "GetObjectsOfTypeId"
  +        let getIndividualsObject = fbRuntimeInfo.FreebaseIndividualsType.GetMethod "_GetIndividualsObject"
  +        let getIndividualById = fbRuntimeInfo.IFreebaseIndividualsType.GetMethod "GetIndividualById"
   
           let domains = 
               lazy 
  
positive.code:                 let declaringType = (theDataTypesClassForDomain, path) ||> List.fold findOrCreateEnclosingType
                  //printfn "FreebaseProvider: creating item type, typeName='%A', fullPath='%A', domainId '%+A', declaringType.Name = '%s'" typeName fullPath domainId declaringType.Name
                  let itemType = 
                      let t = ProvidedTypeDefinition(typeName, baseType=Some fbRuntimeInfo.FreebaseObjectType, HideObjectMethods=true)
                      t.SetAttributes (TypeAttributes.Public ||| TypeAttributes.Interface ||| enum (int32 TypeProviderTypeAttributes.IsErased))
                      t.AddInterfaceImplementationsDelayed(fun () -> [fbRuntimeInfo.FreebaseObjectType])
                      t.AddMembersDelayed (fun () -> makeMembersForFreebaseType fbType)
                      t.AddInterfaceImplementationsDelayed(fun () -> 
                        [ for ity in fbType.IncludedTypes do 
  
negative.code:                   for (property:FreebaseProperty) in typeWithProperties.Properties do
                      if not (String.IsNullOrEmpty property.PropertyName) then 
                          let staticPropertyType = property.FSharpPropertyType(fbSchema, refinedFSharpTypeOfFreebaseProperty, tryFindRefinedTypeForFreebaseType, makeDesignTimeNullableTy, makeDesignTimeSeqTy)
                          let runtimePropertyType = property.FSharpPropertyRuntimeType(fbSchema, fbRuntimeInfo.IFreebaseObjectType)
                          let p = ProvidedProperty(property.PropertyName, staticPropertyType,
                                                   GetterCode = (fun args -> 
                                                        let meth = fbRuntimeInfo.IFreebaseObjectType.GetMethod "GetPropertyByIdTyped"
                                                        let meth = meth.MakeGenericMethod [| runtimePropertyType |]
                                                        Expr.Call(args.[0],meth,[Expr.Value typeWithProperties.Id; Expr.Value property.Id])))
  
  