amalgame/commit

added select/remove

diff --git a/lib/ag_modules/propvalue_select.pl b/lib/ag_modules/propvalue_select.pl
index 3c638a0..8dcaccd 100644
--- a/lib/ag_modules/propvalue_select.pl
+++ b/lib/ag_modules/propvalue_select.pl
@@ -10,10 +10,17 @@ parameter(property, uri, '',
 	  'RDF property by which to select the concepts').
 parameter(value, uri, '',
 	  'RDF object/property value by which to select the concepts').
+parameter(mode, oneof([select, remove]), select, 'select or remove concepts with this property/value pair').
 
 % a bit naive at the moment: we simply change the query that should be
 % done.
 
 selecter(Scheme, and((Scheme), propvalue(Property, Value)), Options) :-
+	option(mode(select), Options),
+	option(property(Property), Options),
+	option(value(Value), Options).
+
+selecter(Scheme, and((Scheme), not(propvalue(Property, Value))), Options) :-
+	option(mode(remove), Options),
 	option(property(Property), Options),
 	option(value(Value), Options).