Golden ratio/Convergence: Difference between revisions
m
→{{header|REXX}}: minor correction
Walterpachl (talk | contribs) (→{{header|REXX}}: added REXX code) |
Walterpachl (talk | contribs) m (→{{header|REXX}}: minor correction) |
||
Line 1,301:
Numeric Digits 16
Parse Value '1 1 1e-5' With oldPhi phi limit
Do iterations=1 By 1 Until delta<=limit
phi=1+1/oldPhi /* next approximation */
delta=abs(phi-oldPhi) /* difference to previous */
|