Golden ratio/Convergence: Difference between revisions

Content added Content deleted
(Added Shen before Wren.)
m (→‎{{header|Shen}}: Reformat.)
Line 1,139: Line 1,139:
(if (and (<= -1 DIFF) (<= DIFF 1))
(if (and (<= -1 DIFF) (<= DIFF 1))
[PHI1 N1 (- PHI1 1.618033988749895)]
[PHI1 N1 (- PHI1 1.618033988749895)]
(iterate PHI1 N1))))
(iterate PHI1 N1))))


(print (iterate 1 0))
(print (iterate 1 0))