4 lines
99 B
Common Lisp
4 lines
99 B
Common Lisp
(defun mean (list)
|
|
(unless (null list)
|
|
(/ (loop for i in list sum i)
|
|
(length list))))
|