Euler method: Difference between revisions

Content added Content deleted
No edit summary
No edit summary
Line 2,297: Line 2,297:
=={{header|Ring}}==
=={{header|Ring}}==
<lang ring>
<lang ring>

decimals(3)
decimals(3)
see euler("noutput = -0.07*(y-20)", 100, 0, 100, 2) + nl
see euler("return -0.07*(y-20)", 100, 0, 100, 2) + nl
see euler("noutput = -0.07*(y-20)", 100, 0, 100, 5) + nl
see euler("return -0.07*(y-20)", 100, 0, 100, 5) + nl
see euler("noutput = -0.07*(y-20)", 100, 0, 100, 10) + nl
see euler("return -0.07*(y-20)", 100, 0, 100, 10) + nl


func euler df, y, a, b, s
func euler df, y, a, b, s
t = a
t = a
while t <= b
while t <= b
see "" + t + " " + y + nl
see "" + t + " " + y + nl
eval(df)
y += s * eval(df)
y += s * noutput
t += s
t += s
end
end