Commit c007c944 authored by HEMERY Mathieu's avatar HEMERY Mathieu
Browse files

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

parent 8e1ecbeb
......@@ -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)
)
).
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment