anchor.diff:          let registered =
               match systemDict.TryGetValue nodeId with
               | (true, system) ->
  -                let _ = system.RegisterCorrelated comp entityId
  +                system.RegisterCorrelated comp entityId |> ignore<'c ComponentRef>
                   true
               | (false, _) -> false
   
  
positive.code:     member this.RegisterMultiplexed comp simplexName entityId =
  
          // register simplex
          let _ = this.RegisterCorrelated Unchecked.defaultof<_> entityId
          let componentMultiplexed = this.IndexCorrelated entityId
          componentMultiplexed.Index.RegisterMultiplexed (simplexName, comp)
          
  
negative.code:         systemsOrdered.Add (system.Name, system)
          system
  
      member this.TryIndexSystem systemName =
          if systemCached.Name <> systemName then
              match systemsUnordered.TryGetValue systemName with
              | (true, system) -> 
                  systemCached <- system
                  Some system
              | (false, _) -> None
          else Some systemCached
  
      member this.IndexSystem systemName =
          if systemCached.Name <> systemName then
              match systemsUnordered.TryGetValue systemName with
              | (true, system) -> 
                  systemCached <- system
                  system
              | (false, _) -> failwith ("Could not index system '" + systemName + "'.")
          else systemCached
  
      member this.TryIndexSystem<'c, 's when 'c : struct and 'c :> 'c Component and 's :> 'w System> () =
          let systemName = Unchecked.defaultof<'c>.TypeName
          match this.TryIndexSystem systemName with
          | Some system ->
              match system with
              | :? 's as systemAsS -> Some systemAsS
              | _ -> None
          | None -> None
  
      member this.IndexSystem<'c, 's when 'c : struct and 'c :> 'c Component and 's :> 'w System> () =
          let systemName = Unchecked.defaultof<'c>.TypeName
          this.IndexSystem systemName :?> 's
  
      member this.IndexSystemNames entityId =
          match correlations.TryGetValue entityId with
          | (true, systemNames) -> systemNames
          | (false, _) -> emptySystemNames
  
      member this.IndexSystems entityId =
          this.IndexSystemNames entityId |>
          Seq.map this.IndexSystem
  
      member this.IndexEntities systemNames =
          correlations |>
  