anchor.diff:      ets:delete(?NT_LID),
       ets:delete(?NT_PID).
   
  --spec to_string(lid()) -> string().
  -
  -to_string(Lid) ->
  -    "P" ++ Lid.
  -
   %% Unlink two LIDs.
   -spec unlink(lid(), lid()) -> boolean().
   
  
positive.code: %%%----------------------------------------------------------------------
  
  %% First process' LID.
  root_lid() ->
      "1".
  
  %% Create new lid from parent and its number of children.
  next_lid(ParentLid, Children) ->
      lists:concat([ParentLid, ".", Children + 1]).
  
negative.code: %% The logical id (LID) for each process reflects the process' logical
  %% position in the program's "process creation tree" and doesn't change
  %% between different runs of the same program (as opposed to erlang pids).
  -type lid() :: integer().
  
  %%%----------------------------------------------------------------------
  %%% User interface
  