anchor.diff:                                   {<<"@">>, SubjectValue} -> SubjectValue;
                                    false ->
                                        Uuid = uuid:to_string(uuid:v4()),
  -                                     list_to_binary(io_lib:format("_:~p", [Uuid]))
  +                                     list_to_binary(io_lib:format("_:~s", [Uuid]))
                               end,
                               LinkedTriple = triple(State#state.subject, Property, LinkedTripleObject, State#state.context),
                               NewState#state{triples = lists:append(NewState#state.triples, [LinkedTriple])};
  
positive.code:     [triples(H, InitialState) | triples(T, InitialState)];
  
  triples([], InitialState) ->
      InitialState#state.triples.
  
  is_resource(_Subject, _Property, Object, ContextDict) ->
      dict:is_key(Object, ContextDict)
  
negative.code: process_subject_value(SubjectValue, StateWithLocalContext) when is_list(SubjectValue) ->
      TriplesFromList = triples(SubjectValue, StateWithLocalContext),
      Uuid = uuid:to_string(uuid:v4()),
      CurrentSubject = list_to_binary(io_lib:format("_:~s", [Uuid])),
      StateWithLocalContext#state{
          subject = CurrentSubject,
          triples = lists:append(TriplesFromList, StateWithLocalContext#state.triples)
  