diff --git a/src/lib/lists.pl b/src/lib/lists.pl index f1b7cdd5..3d1cc6a2 100644 --- a/src/lib/lists.pl +++ b/src/lib/lists.pl @@ -426,7 +426,6 @@ nth1(N, Es0, E) :- skipn(N0, Es0,Es, Xs0,Xs) :- N0>0, - !, % should not be necessary #1028 N1 is N0-1, Es0 = [E|Es1], Xs0 = [E|Xs1],