6 lines
108 B
Common Lisp
6 lines
108 B
Common Lisp
(defun element-at (lst pos)
|
|
(nth (1- pos) lst))
|
|
|
|
;; C-c C-k
|
|
(assert (equal (element-at '(a b c d) 3) 'C))
|