7 lines
138 B
Common Lisp
7 lines
138 B
Common Lisp
null[x] = [x = NIL -> T; T -> F]
|
|
|
|
(SETQ NULL
|
|
'(LAMBDA (X)
|
|
(COND
|
|
((EQUAL X NIL) 'T)
|
|
(T (QUOTE F))))) |