有没有办法知道prolog中列表中元素的索引？

Question

我正在提交作业，活动说：

给定一个参赛者在一个类别的跳跃中获得的分数也作为参数接收，显示跳跃编号索引（列表的顺序号）。 例如，在跳高 HUGO LENIN 在类别 2 中获得 8 分的答案将是 2，因为它在列表中排在第二位。 如果在任何跳转中都没有获得收到的分数，则返回 -1，如果分数重复，则返回您找到的第一个。

%jump(name, class, score
jump('HUGO LENIN',2,[7,8,8,5]).

%class (n° class, name class, number of attempts allowed)
class(1, 'Long Jump',4).
class(2,'High Jump',5).

我真的不知道该怎么做

Answer 1

在 SWI-Prolog 中，当Elem是List的第Index元素时， nth1( Index , List , Elem )为真，从 1 开始计数。或者，如果您更喜欢从 0 开始计数，则可以使用nth0/3 。两个谓词都已定义在library(lists) ，它是自动加载的。

例子：

?- nth1(Index, [a,b,c], b).
Index = 2 ;
false.

?- nth1(2, [a,b,c], Elem).
Elem = b.

如果您只需要知道元素在列表中第一次出现的索引，您还可以使用 ISO 内置谓词once/1 ：

例子：

?- once(nth1(Index, [a,b,c], b)).
Index = 2.

?- once(nth1(Index, [a,b,c,b], b)).
Index = 2.

?- nth1(Index, [a,b,c,b], b).
Index = 2 ;
Index = 4.