anchor.diff:                  let (entityState, world) =
                       let oldFacetNames = entityState.FacetNames
                       let entityState = Overlayer.applyOverlayToFacetNames EntityState.copy oldOverlayName overlayName entityState overlayer overlayer
  -                    match World.trySynchronizeFacetsToNames oldFacetNames entityState (Some entity) world with
  +                    match World.trySynchronizeFacetsToNames oldFacetNames entityState entity world with
                       | Right (entityState, world) -> (entityState, world)
                       | Left error -> Log.debug error; (entityState, world)
                   let facetNames = World.getEntityFacetNamesReflectively entityState
  
positive.code:             then setFlag publishUpdates entity world
              else world
  
          static member internal trySetFacetNames facetNames entityState entityOpt world =
              let intrinsicFacetNames = World.getEntityIntrinsicFacetNames entityState
              let extrinsicFacetNames = Set.fold (flip Set.remove) facetNames intrinsicFacetNames
              let facetNamesToRemove = Set.difference entityState.FacetNames extrinsicFacetNames
              let facetNamesToAdd = Set.difference extrinsicFacetNames entityState.FacetNames
              match World.tryRemoveFacets facetNamesToRemove entityState entityOpt world with
              | Right (entityState, world) -> World.tryAddFacets facetNamesToAdd entityState entityOpt world
              | Left _ as left -> left
  
          static member internal trySynchronizeFacetsToNames oldFacetNames entityState entityOpt world =
              let facetNamesToRemove = Set.difference oldFacetNames entityState.FacetNames
              let facetNamesToAdd = Set.difference entityState.FacetNames oldFacetNames
              match World.tryRemoveFacets facetNamesToRemove entityState entityOpt world with
              | Right (entityState, world) -> World.tryAddFacets facetNamesToAdd entityState entityOpt world
              | Left _ as left -> left
  
          static member internal attachIntrinsicFacetsViaNames entityState world =
  
negative.code:         /// Try to set the entity's facet names.
          static member trySetEntityFacetNames facetNames entity world =
              let entityState = World.getEntityState entity world
              match World.trySetFacetNames facetNames entityState entity world with
              | Right (entityState, world) ->
                  let oldWorld = world
                  let oldEntityState = entityState
  