Sammlungen
Wikis
Lisp Package
adjoin
Login
Über dieses
Dokument beschweren
Hinzufügen kann man ein Element zu einer
Menge
mit
adjoin
.
>
(
adjoin
(
quote
c) (
quote
(a b c d)))
(a b c d)
>
(
adjoin
(
quote
x) (
quote
(a b c d)))
(x a b c d)
Die
Funktion
adjoin
basiert auf
if
,
member?
und
cons
:
(
setq
adjoin
(
lambda
(x l)
(
if
(
member?
x l)
l
(
cons
x l))))