Quick fix v2
This commit is contained in:
parent
9aeaebfded
commit
10fb55086f
@ -70,6 +70,8 @@ polyplay :-
|
|||||||
%% Tests:
|
%% Tests:
|
||||||
%% ?- polyplay.
|
%% ?- polyplay.
|
||||||
|
|
||||||
|
process_input(_).
|
||||||
|
|
||||||
%% nlp_number(?W:Atom, ?D:Int) is det
|
%% nlp_number(?W:Atom, ?D:Int) is det
|
||||||
%
|
%
|
||||||
% Definition of a Alphabetical and Numerical relation
|
% Definition of a Alphabetical and Numerical relation
|
||||||
@ -303,8 +305,7 @@ parse_command(op(*, TN, TP)) -->
|
|||||||
[multiply],
|
[multiply],
|
||||||
parse_number(TN),
|
parse_number(TN),
|
||||||
[by],
|
[by],
|
||||||
parse_polynomial(_-_, TP).
|
parse_polynomial(TP).
|
||||||
|
|
||||||
parse_input(command(TCL, TCR)) -->
|
parse_input(command(TCL, TCR)) -->
|
||||||
parse_command(TCL),
|
parse_command(TCL),
|
||||||
[and],
|
[and],
|
||||||
|
Reference in New Issue
Block a user