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