Arithmetic-geometric mean: Difference between revisions
Content added Content deleted
(Added various BASIC dialects (Applesoft BASIC, Gambas, MSX Basic, Minimal BASIC, QuiteBASIC and Yabasic)) |
m (→{{header|Wren}}: Changed to Wren S/H) |
||
| Line 3,532: | Line 3,532: | ||
=={{header|Wren}}== |
=={{header|Wren}}== |
||
{{trans|Go}} |
{{trans|Go}} |
||
<syntaxhighlight lang=" |
<syntaxhighlight lang="wren">var eps = 1e-14 |
||
var agm = Fn.new { |a, g| |
var agm = Fn.new { |a, g| |
||