anchor.diff:  
   parse_argument(Arg) ->
       [Arg].
  -
  -parse_predicate(P) ->
  -    case P of
  -        [Node, PredName] -> [Node, erlang:binary_to_existing_atom(PredName)];
  -        _ -> P
  -    end.
   
   date_facet(Property) ->
       %% A facet on a date property is a min/max range.
  
positive.code: parse_argument({hasobjects, Objects}) ->
      lists:map(
          fun(Object) ->
              {hasobject, parse_predicate(Object)}
          end,
          Objects
      );
  
negative.code: parse_argument({hassubjects, Subjects}) ->
      lists:map(
          fun(Subject) ->
              {hassubject, Subject}
          end,
          Subjects
      );
  