anchor.diff:  	{ok, #state{}}.
   
   handle_call({insert,UserInfo}, _From, State) ->
  -    Result = atomic_insert_new_user(UserInfo),
  +    Result = sync_insert_new_user(UserInfo),
       {reply, Result, State};
   handle_call(_Request, _From, State) ->
   	{reply, ignored, State}.
  
positive.code:     insert_user(UserInfo).
  
  insert_user({ok, UserInfo}) ->
      {ok, UserPid} = gen_server:call(?MODULE,{insert,UserInfo}),
      ok = tts_user:set_user_info(UserInfo,UserPid),
      {ok, UserPid};
  insert_user({error, not_found}) ->
      {error, not_found}.
  
  
  
  atomic_insert_new_user(UserInfo) ->
      UserIdList = maps:get(user_ids,UserInfo,[]),
      [UserId |_] = UserIdList,
      case add_new_user_entries(UserIdList,UserId,UserInfo) of
          ok -> 
              {ok, UserId};
  
negative.code: 
  
  add_new_user_entries(Mappings,UserId, UserInfo) ->
      Timestamp = 1234,
      ok = tts_data:user_insert_data(UserId,UserInfo,Timestamp),
      ok = tts_data:user_insert_mappings(Mappings). 
  
  lookup_user(IssSub) ->
     tts_data:user_lookup_id(IssSub). 
  
  retrieve_user_info(Id) ->
      case tts_data:user_get_data(Id) of
          {ok, {Id, UserInfo, _TimeStamp}} ->
              {ok, UserInfo};
          Other -> Other
      end.
  
  %% delete_user_mappings(IssSubList) ->
  %%     tts_data:user_delete_mappings(IssSubList).
  