Horner's rule for polynomial evaluation: Difference between revisions

Cleaned Haskell version
(Cleaned Haskell version)
Line 349:
horner v x = foldl (\a b -> a*x + b) 0 (reverse v)
 
main = print ($ horner [-19, 7, -4, 6] 3)</lang>
main = do
print (horner [-19, 7, -4, 6] 3)</lang>
 
=={{header|HicEst}}==
Anonymous user