Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
isMember - isMember.pl

isMember.pl

Caricato da: Nophiq
Scarica il programma completo

  1. % Funtore che ricerca un atomo all''interno della liste e delle sue sottoliste.
  2.  
  3. % Sono le regole del funtore member.
  4. isMember(X, [X|_]).
  5. isMember(X, [_|T]) :- isMember(X, T).
  6.  
  7. % Se H è una lista compio la ricerca in H e nel resto della lista T
  8. isMember(X, [H|_]) :- is_list(H), isMember(X, H).
  9. isMember(X, [H|T]) :- is_list(H), isMember(X, T).