4 lines
90 B
Common Lisp
4 lines
90 B
Common Lisp
(defun mean (list)
|
|
(when list
|
|
(/ (loop for i in list sum i)
|
|
(length list))))
|