Заданный элемент встречается в некотором списке один единственный раз (является уникальным) - Prolog

Формулировка задачи:

Напишите правило, которое проверяет, если заданный элемент встречается в некотором списке один единственный раз (является уникальным)

Код к задаче: «Заданный элемент встречается в некотором списке один единственный раз (является уникальным) - Prolog»

textual
uniq1(X, L) :-
    uniq1(L, X, none),
    !.
 
uniq1([], _, exist).
uniq1([X | T], X, none) :-
    uniq1(T, X, exist).
uniq1([Y | T], X, Flag) :-
    X \= Y,
    uniq1(T, X, Flag).

8   голосов, оценка 4.375 из 5


СОХРАНИТЬ ССЫЛКУ