anchor.diff:       %case_spell].
   
   init_per_testcase(_, Config) ->
  -    %gerlshmud_dbg:add(gerlshmud_event_log, div_),
  -    %gerlshmud_dbg:add(gerlshmud_event_log),
  -    %gerlshmud_dbg:add(gerlshmud_event_log, flatten),
       %gerlshmud_dbg:add(gerlshmud_index, get),
   
       %dbg:tracer(),
  
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:     true = val(is_alive, p_life),
      false = val(is_alive, g_life).
  
  revive_process(Config) ->
      start(?WORLD_3),
  
  