Arithmetic-geometric mean: Difference between revisions
Add BQN
(Undo revision 346087 by Nigel Galloway (talk)) |
Not a robot (talk | contribs) (Add BQN) |
||
Line 474:
{{Out}}
<pre>.84721308479397908659</pre>
=={{header|BQN}}==
<lang bqn>AGM ← {
(|𝕨-𝕩) ≤ 1e¯15? 𝕨;
(0.5×𝕨+𝕩) 𝕊 √𝕨×𝕩
}
1 AGM 1÷√2</lang>
{{out}}
<pre>0.8472130847939792</pre>
=={{header|C}}==
| |||