anchor.diff:                                          Options),
       case Result of
           {ok, _} ->
  -            lager:info("Team read succeeded."),
               {ok, State};
           {error, {notfound, _}} ->
               lager:info("Team does not exist yet."),
  
positive.code:             case length(Members) > 0 of
                  true ->
                      Value = hd(Members),
                      lager:info("Team read succeeded"),
                      Result2 = riakc_pb_socket:update_type(State#state.pid,
                                       fun(M2) ->
                                               riakc_map:update(
                                                      {<<"members">>, set},
                                                      fun(R) ->
                                                          riakc_set:del_element(
                                                            Value, R)
                                                      end, M2)
                                       end,
                                       State#state.bucket, Key, [create]),
                      case Result2 of
                          ok ->
                              lager:info("Team player removal succeeded."),
                              {ok, State};
                          {ok, _} ->
                              lager:info("Team player removal succeeded."),
                              {ok, State};
                          {error, Reason} ->
                              lager:info("Team player removal failed, error: ~p", [Reason]),
  
negative.code: run({game, completed}, KeyGen, ValueGen, State) ->
      Key = integer_to_list(KeyGen()),
      Value = ValueGen(),
      Result = riakc_pb_socket:modify_type(State#state.pid,
                       fun(M) ->
                               riakc_map:update(
                                      {<<"score">>, counter},
  