PPT-Folie
Bestimmen der Länge einer Liste:
list_length( [H | T], N ) :- list_length(T,M), N is M + 1.
Zählen eines Elements einer Liste:
count_element( [], Element, 0).
count_element( [H|T], Element, Anzahl) :-
H = Element, count_element(T, Element, X), Anzahl is X + 1.
count_element( [H|T], Element, Anzahl) :-
count_element(T, Element, Anzahl).
Prüfen ob Element in Liste vorhanden ist:
member(E, [H|T) :- member(E,T).