3 lines
92 B
Plaintext
3 lines
92 B
Plaintext
copy[x] = [null[x] -> NIL;
|
|
atom[x] -> x;
|
|
T -> cons[ copy[ car[x]]; copy[ cdr[x]]]] |