### 1.37.22 Απαλοιφή στοιχείων από μια λίστα: remove

remove παίρνει σαν όρισμα : μια λογική συνάρτηση f και μια λίστα L.
remove απαλείφει από την λίστα L, τα στοιχεία c τέτοια ώστε f(c)==true.
Είσοδος :

remove(x->(x>=2),[0,1,2,3,1,5])

Έξοδος :

[0,1,1]

Σχόλιο Το ίδιο ισχύει και στις συμβολοσειρές, για παράδειγμα, για να αφαιρέσουμε όλα τους χαρακτήρες "a" μιας συμβολοσειράς εισάγουμε:
Είσοδος :

ord("a")

Έξοδος :

97

Είσοδος :

     f(chn):={
     local l:=length(chn)-1;
     return remove(x->(ord(x)==97),seq(chn[k],k,0,l));
     }

Μετά, εισάγουμε:

f("abracadabra")

Έξοδος :

["b","r","c","d","b","r"]

Για να πάρουμε την συμβολοσειρά που αντιστοιχεί στους παραπάνω χαρακτήρες, εισάγουμε :

char(ord(["b","r","c","d","b","r"]))

Έξοδος :

"brcdbr"