Commit 2a21e93c authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(caar, cadr, cdar, cddr): Definitiosn deleted.

parent 0e6bb54e
......@@ -403,22 +403,6 @@ SEQ, this is like `mapcar'. With several, it is like the Common Lisp
"Return the tenth element of the list LIST."
(nth 9 x))
(defun caar (x)
"Return the `car' of the `car' of X."
(car (car x)))
(defun cadr (x)
"Return the `car' of the `cdr' of X."
(car (cdr x)))
(defun cdar (x)
"Return the `cdr' of the `car' of X."
(cdr (car x)))
(defun cddr (x)
"Return the `cdr' of the `cdr' of X."
(cdr (cdr x)))
(defun caaar (x)
"Return the `car' of the `car' of the `car' of X."
(car (car (car x))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment