Update test for revision, still a legitimare ERROR occurs

revision.plt

@@ -21,7 +21,7 @@ test(
   'revise_model rule addition for ECTL',
   [
     setup(clear_model),
-    all(Reactions = [['_' => b], [a => b], ['_' =[a]=> b]])
+    all(Reactions = [[('MA'(1) for '_'=>b)],[('MA'(1) for a=>b)],[('MA'(1) for a=>b+a)]])
   ]
 ) :-
   command(present(a)),
@@ -32,7 +32,7 @@ test(
   'revise_model rule addition for UCTL',
   [
     setup(clear_model),
-    all(Reactions = [[a => b]])
+    all(Reactions = [[('MA'(1)for a=>b)]])
   ]
 ) :-
   command(present(a)),
@@ -54,7 +54,7 @@ test(
   'revise_model rule deletion (from counter-example) for ACTL',
   [
     setup(clear_model),
-    all((Added, Removed) = [([], [a => b])])
+    all((Added, Removed) = [([],[('MA'(1)for a=>b)])])
   ]
 ) :-
   command(present(a)),
@@ -68,9 +68,7 @@ test(
   [
     setup(clear_model),
     all((Added, Removed) =
-      [([], [
-        '_'=>'_', '_'=>a, a=>'_', '_'=[a]=>'_', a=>b, b=>'_', b=>a, a+b=>'_',
-        b=[a]=>'_', a=[b]=>'_'])])
+    [([],[('MA'(1)for'_'=>'_'),('MA'(1)for'_'=>a),('MA'(1)for a=>'_'),('MA'(1)for a=>a),('MA'(1)for a=>b),('MA'(1)for a=>b+a),('MA'(1)for b=>'_'),('MA'(1)for b=>a),('MA'(1)for b=>a+b),('MA'(1)for a+b=>'_'),('MA'(1)for b+a=>a),('MA'(1)for a+b=>b)])]
   ]
 ) :-
   command(add_reaction('_' => '_')),
@@ -113,8 +111,8 @@ test(
       Removed
     )
   ),
-  assertion(Added = [c=[a]=>'_', a=[b]=>'_', b=[c]=>'_']),
-  assertion(Removed = [a=>'_', b=>'_', c=>'_']).
+  assertion(Added = ['MA'(1) for c+a=>a,'MA'(1) for a+b=>b,'MA'(1) for b+c=>c]),
+  assertion(Removed = ['MA'(1) for a=>_,'MA'(1) for b=>_,'MA'(1) for c=>_]).
 
 test(
   'Qu1',