anchor.diff:      member this.IndexNode nodeId =
           match systemDict.TryGetValue nodeId with
           | (true, system) -> system.Components
  -        | (false, _) -> failwith ("Node with id '" + scstring nodeId + "'not found.")
  +        | (false, _) -> failwith ("Node with id '" + scstring nodeId + "' not found.")
   
       member this.AddNode (parentIdOpt : Guid option) =
           let nodeId = Gen.id
  
positive.code:             else freeIndex <- dec freeIndex
              correlations.Remove entityId |> ignore<bool>
              correlationsBack.Remove index |> ignore<bool>
              comp.Disjunction index componentsJunctioned ecs
              if  components.Length < freeList.Count * 2 && // freeList is always empty if unordered
                  components.Length > Constants.Ecs.ArrayReserve then
                  this.Compact ecs
  
negative.code:     inherit SystemMany<'w> (name)
  
      let mutable components = ecs.AllocateArray<'c> name
      let mutable junctions = Unchecked.defaultof<'c>.AllocateJunctions ecs
      let mutable freeIndex = 0
      let freeList = HashSet<int> ()
      let correlations = dictPlus [] : Dictionary<Guid, int>
  