Horner's rule for polynomial evaluation: Difference between revisions

Added Arturo implementation
m (→‎{{header|Phix}}: added syntax colouring, marked p2js compatible)
(Added Arturo implementation)
Line 239:
println! (res)
end // end of [main0]</lang>
 
=={{header|Arturo}}==
 
<lang rebol>horner: function [coeffs, x][
result: 0
loop reverse coeffs 'c ->
result: c + result * x
return result
]
 
print horner @[neg 19, 7, neg 4, 6] 3</lang>
 
{{out}}
 
<pre>128</pre>
 
=={{header|AutoHotkey}}==
1,532

edits