This website works better with JavaScript
Startsida
Utforska
Hjälp
Logga in
radu
/
LaTeX-examples
Bevaka
1
Stjärnmärk
0
Fork
0
Filer
Ärenden
0
Pull-förfrågningar
0
Wiki
Träd:
b18561fc54
Grenar
Taggar
master
LaTeX-examples
/
documents
/
Programmierparadigmen
/
scripts
/
prolog
/
delete.pl
delete.pl
96 B
Historik
Rå
1
2
3
remove([(X,A)|L],X,[(X,ANew)|L]) :- A>0, ANew is A-1.
remove([X|L],Y,[X|L1]) :- remove(L,Y,L1).