A voir également:
- Prolog delete element from list
- Hiberfil.sys delete - Guide
- Juste delete me - Guide
- List disk - Guide
- Win setup from usb - Télécharger - Utilitaires
- Directory list & print - Télécharger - Divers Utilitaires
2 réponses
remove_at(Elem,[Elem|Reste],1,Reste).
remove_at(Elem,[Y|Reste],Position,[Y|Ys]) :- Position > 1,
K1 is Position - 1, remove_at(Elem,Reste,K1,Ys).
Exemple d'utilisation:
%?- remove_at(X,[a,b,c,d],2,R).
%X = b
%R = [a,c,d]
remove_at(Elem,[Y|Reste],Position,[Y|Ys]) :- Position > 1,
K1 is Position - 1, remove_at(Elem,Reste,K1,Ys).
Exemple d'utilisation:
%?- remove_at(X,[a,b,c,d],2,R).
%X = b
%R = [a,c,d]
