Rosetta Code

Horner's rule for polynomial evaluation: Difference between revisions

Page Discussion

Horner's rule for polynomial evaluation (view source)

Revision as of 03:05, 21 September 2011

16 bytes removed ,  12 years ago
→‎{{header|Haskell}}: point-free style
(→‎{{header|Haskell}}: point-free style)
Line 409:
 
=={{header|Haskell}}==
<lang haskell>horner :: [Float](Num a) => a -> Float[a] -> Floata
horner v x = foldlfoldr1 (\a b -> a*x + b) 0 (reverse v*x)
 
main = print $ horner 3 [-19, 7, -4, 6] 3</lang>
 
=={{header|HicEst}}==
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/144265"