Quick fix v2

This commit is contained in:
Hugo Sales 2018-12-17 16:35:41 +00:00
parent 9aeaebfded
commit 10fb55086f

View File

@ -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],