anchor.diff:  %% Purpose: Given a proplist, the return value will be a 'user' record with the values taken from the proplist.
   %% Returns: user::record()
   %% @end
  -
  +-spec json_to_user(string()) -> Record :: #user{}.
   json_to_user(JsonData) ->
   	#user{id = proplists:get_value(<<"id">>, JsonData),
   		email = proplists:get_value(<<"email">>, JsonData), 
  
positive.code: %% Purpose: Retrieves the if from the path.
  %% Returns: Id
  %% @end
  id_from_path(RD) ->
      case wrq:path_info(id, RD) of
          undefined->
  
negative.code: %% Returns: obj :: JSON()
  %% @end
  
  -spec user_to_json( Record :: #user{}) -> string().
  user_to_json(Record) ->
    [_ | Values] = tuple_to_list(Record),
    Keys = [<<"id">>, <<"email">>, <<"user_name">>, <<"password">>, 
  