Chavetas mágicas

2018-12-20 02:51:21 +00:00 · 2018-12-20 02:51:21 +00:00 · c7ad8a2883
parent 90b5c6b3f1
commit c7ad8a2883
1 changed files with 1 additions and 1 deletions
--- a/polymani.pl
+++ b/polymani.pl
@ -680,7 +680,7 @@ parse_polynomial_explicit(TLP-TL, T) -->
    %% on the left, through the difference structure,
    parse_polynomial_operand(TL),
    %% parse either a minus or a plus
-    member(COp, [-, +]),
+    { member(COp, [-, +]) },
    parse_operation(COp),
    !,
    %% Recurse on the right with add; position the sub tree on the right