anchor.diff:      true = val(is_alive, p_life),
       false = val(is_alive, g_life).
   
  -%% TODO
  -%% Give a MUCH better explanation of how registering for dead
  -%% pid replacements works.
  -%% I rushed the commit comment to get the commit in before
  -%% midnight and I gave the briefest explanation for dead
  -%% pid subscriptsion.
   revive_process(Config) ->
       start(?WORLD_3),
   
  
positive.code:     false = val(is_alive, g_life),
      true = 1000 > val(hitpoints, p_hp),
      true = val(is_alive, p_life),
      %F = fun() -> mnesia:select(object, [{'$1', [], ['$_']}]) end,
      %Result = mnesia:transaction(F),
      %ct:pal("Mnesia query:~n~p~n", [Result]),
      ok.
  
  cast_spell(Config) ->
  
negative.code: get_props(undefined) ->
      [];
  get_props(Obj) when is_atom(Obj) ->
      Pid = get_pid(Obj),
      get_props(Pid);
  get_props(Pid) when is_pid(Pid) ->
      case is_process_alive(Pid) of
          true ->
              {_RecordName, Props} = sys:get_state(Pid),
              Props;
          false ->
              undefined
      end.
  
  