Sum and product of an array: Difference between revisions
→{{header|Emacs Lisp}}
(Add Racket entry) |
|||
Line 397:
(eval (concatenate 'list '(+) array))
(eval (concatenate 'list '(*) array))</lang>
===With a list===
<lang lisp>(setq array '(1 2 3 4 5))
(apply '+ array)
(apply '* array)</lang>
===With explicit conversion===
<lang lisp>(setq array [1 2 3 4 5])
(apply '+ (append array nil))
(apply '* (append array nil))</lang>
=={{header|Erlang}}==
|