anchor.diff:               ("getEntities", { Fn = evalGetEntitiesBinding; Pars = [|"group"|]; DocOpt = None })
                ("getEntityRoots", { Fn = evalGetEntityRootsBinding; Pars = [|"group"|]; DocOpt = None })
                ("getEntitySovereigns", { Fn = evalGetEntitySovereignsBinding; Pars = [|"group"|]; DocOpt = None })
  +             ("destroyEntity", { Fn = evalDestroyEntityBinding; Pars = [|"entity"|]; DocOpt = None })
  +             ("destroyEntities", { Fn = evalDestroyEntitiesBinding; Pars = [|"entities"|]; DocOpt = None })
                ("tryPickEntity", { Fn = evalTryPickEntityBinding; Pars = [|"position"; "entities"|]; DocOpt = None })
                ("writeEntityToFile", { Fn = evalWriteEntityToFileBinding; Pars = [|"filePath"; "enity"|]; DocOpt = None })
                ("createEntity", { Fn = evalCreateEntityBinding; Pars = [|"dispatcherName"; "names"; "overlayDescriptor"; "group"|]; DocOpt = None })
                ("readEntityFromFile", { Fn = evalReadEntityFromFileBinding; Pars = [|"filePath"; "nameOpt"; "group"|]; DocOpt = None })
  +             ("renameEntity", { Fn = evalRenameEntityBinding; Pars = [|"source"; "destination"|]; DocOpt = None })
                ("trySetEntityOverlayNameOpt", { Fn = evalTrySetEntityOverlayNameOptBinding; Pars = [|"overlayNameOpt"; "entity"|]; DocOpt = None })
                ("trySetEntityFacetNames", { Fn = evalTrySetEntityFacetNamesBinding; Pars = [|"facetNames"; "entity"|]; DocOpt = None })
                ("getEyeCenter", { Fn = evalGetEyeCenterBinding; Pars = [||]; DocOpt = None })
  
positive.code:         | None ->
              match evaleds with
              | [|filePath; nameOpt; group|] -> readEntityFromFile filePath nameOpt group world
              | _ ->
                  let violation = Scripting.Violation (["InvalidBindingInvocation"], "Incorrect number of arguments for binding '" + fnName + "' at:\n" + SymbolOrigin.tryPrint originOpt, None)
                  struct (violation, world)
  
negative.code:             let violation = Scripting.Violation (["InvalidBindingInvocation"], "Could not invoke binding 'readEntityFromFile' due to: " + scstring exn, None)
              struct (violation, World.choose oldWorld)
  
      let renameEntity source destination world =
          let oldWorld = world
          try
              let struct (source, world) =
                  let context = World.getScriptContext world
                  match World.evalInternal source world with
                  | struct (Scripting.String str, world)
                  | struct (Scripting.Keyword str, world) ->
                      let relation = Relation.makeFromString str
                      let address = Relation.resolve context.SimulantAddress relation
                      struct (Entity address, world)
                  | struct (Scripting.Violation (_, error, _), _) -> failwith error
                  | struct (_, _) -> failwith "Relation must be either a String or Keyword."
              let struct (destination, world) =
                  let context = World.getScriptContext world
                  match World.evalInternal destination world with
                  | struct (Scripting.String str, world)
                  | struct (Scripting.Keyword str, world) ->
                      let relation = Relation.makeFromString str
                      let address = Relation.resolve context.SimulantAddress relation
                      struct (Entity address, world)
                  | struct (Scripting.Violation (_, error, _), _) -> failwith error
                  | struct (_, _) -> failwith "Relation must be either a String or Keyword."
              let result = World.renameEntity source destination world
              struct (Scripting.Unit, result)
          with exn ->
              let violation = Scripting.Violation (["InvalidBindingInvocation"], "Could not invoke binding 'renameEntity' due to: " + scstring exn, None)
              struct (violation, World.choose oldWorld)
  
      let trySetEntityOverlayNameOpt overlayNameOpt entity world =
          let oldWorld = world
          try
  