Arithmetic-geometric mean/Calculate Pi: Difference between revisions
Content added Content deleted
(→{{header|Raku}}: mention task Integer roots) |
(→{{header|Raku}}: better guess for square root) |
||
Line 1,401: | Line 1,401: | ||
multi sqrt(Int $n) { |
multi sqrt(Int $n) { |
||
( |
( exp($n.log/2).Int, { ($_ + $n div $_) div 2 } ... * == *).tail |
||
} |
} |
||