Avoid the peculiar syntax =[...]=> for catalysts

reaction_editor.pl

@@ -116,23 +116,6 @@ merge_reactions(Reaction1, Reaction2):-
   append(Products1,Products2,Products),
   add_reaction(Kinetics1+Kinetics2,Reactants,Inhibitors,Products,false).
 
-
-%simplify_all_reactions :-
-%  biocham_command,
-%  doc('
-%    replaces each reaction by a simplified form, by grouping common molecules,
-%    identifying catalysts, and by using the canonical molecule for aliases.
-%  '),
-%  \+ (
-%    item([kind: reaction, id: Id, item: Reaction]),
-%    \+ (
-%      delete_item(Id),
-%      simplify_reaction(Reaction, SimplifiedReaction),
-%      add_item([kind: reaction, item: SimplifiedReaction])
-%    )
-%  ).
-
-
 list_reactions :-
   biocham_command,
   doc('lists the current set of reaction rules.'),
@@ -590,7 +573,7 @@ make_reaction(
     ->
       Body = (Reactants <=> RightSolution)
     ;
-      Body = (Reactants <=[ CatalystSolution ]=> RightSolution)
+      Body = (Reactants + CatalystSolution <=> RightSolution + CatalystSolution)
     )
   ;
     (
@@ -598,7 +581,7 @@ make_reaction(
     ->
       Body = (Reactants => RightSolution)
     ;
-      Body = (Reactants =[ CatalystSolution ]=> RightSolution)
+      Body = (Reactants + CatalystSolution => RightSolution + CatalystSolution)
     )
   ).