Right, there's an awful lot of Lisp actually working...
This commit is contained in:
parent
c3b327f760
commit
1f16241af7
31 changed files with 250 additions and 97 deletions
5
resources/mexpr/intersection.mexpr.lsp
Normal file
5
resources/mexpr/intersection.mexpr.lsp
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
;; page 15
|
||||
|
||||
intersection[x;y] = [null[x] -> NIL;
|
||||
member[car[x]; y] -> cons[car[x]; intersection[cdr[x]; y]];
|
||||
T -> intersection[cdr[x]; y]]
|
||||
Loading…
Add table
Add a link
Reference in a new issue