Напишите программу на Прологе для реализации vani sh (R, L, N), где R обозначает элемент, все вхождения которого необходимо удалить из списка L, чтобы получить список N

Question

Напишите программу на Прологе для реализации vani sh (R, L, N), где R обозначает элемент, все вхождения которого необходимо удалить из списка L, чтобы получить список N.

Answer 1

Это должно работать:

vanish(_,[],[]).
vanish(E,[E|Ls],N) :- vanish(E,Ls,N).
vanish(E,[L|Ls],[L|Ns]) :- L\=E, vanish(E,Ls,Ns).