Anonymous user
Horner's rule for polynomial evaluation: Difference between revisions
Horner's rule for polynomial evaluation (view source)
Revision as of 21:33, 7 February 2022
, 2 years agoEmacs Lisp: Improve formatting, use cl-lib
Drkameleon (talk | contribs) (Added Arturo implementation) |
(Emacs Lisp: Improve formatting, use cl-lib) |
||
Line 653:
=={{header|Emacs Lisp}}==
{{trans|Common Lisp}}
<lang
(defun horner (coeffs x)
(cl-reduce #'(lambda (coef acc) (+ (* acc x) coef)
coeffs :from-end t :initial-value 0)
(horner '(-19 7 -4 6) 3)</lang>▼
{{out}}
128▼
▲(horner '(-19 7 -4 6) 3)
▲128
=={{header|Erlang}}==
| |||