list - Visual Prolog: anyflow の最大数

Question

Maximum number of anyflow variants (1000) exceededこのコードを実行しようとすると、次のエラー メッセージが表示されます。

findNegative([], []).
findNegative([Q|V], Y) :-
   Q > 0,
   !,
   findNegative(V, Y).
findNegative([H1|T1], S) :-
   findNegative(T1, [H1|S]).

この回答からコードを実行しようとするときも同じです: https://stackoverflow.com/a/6671142/4829408