anchor.diff:          [P, N] <- ets:match(pg2_table, {{member, Name, '$1'},'$2'}),
           _ <- lists:seq(1, N)].
   
  +group_member(Name, Pos) ->
  +    {Members, _} = ets:match(pg2_table, {{member, Name, '$1'},'$2'}, Pos),
  +    Matches = [P || 
  +        [P, N] <- Members,
  +        _ <- lists:seq(1, N)],
  +    lists:last(Matches).
  +        
  +
   local_group_members(Name) ->
       [P || 
           [Pid] <- ets:match(pg2_table, {{local_member, Name, '$1'}}),
  
positive.code:     case ets:member(pg2_table, {group, Name}) of
          true ->
              local_group_members(Name);
          false ->
              {error, {no_such_group, Name}}
      end.
  
negative.code:                 unavailable ->
                      {error, {no_process, Name}};
                  _ ->
                      get_member(Name, NextProcessIndex)
              end
      end.
  
  