所以这是我在SWI-Prolog中的内容。
:- style_check(-singleton).
first_big([NumList], First).
first_big([X|Xs], R):- first_big(Xs, T), (X > 100 -> R = X ; R = T).
如果列表中的任何一个数字小于100,我想用以下方法输出false。
first_big([1,20,3,1,50,10,6],First).应该是假的。
first_big([1,200,3,1,50,10,6],First).应该为真。
我也试过这些,但不成功
%first_big([X|Xs], R):- first_big(Xs, T), X < 100, R is False.
%first_big([], _):- 0.
%first_big([NumList < 100], false).