Arithmetic-geometric mean/Calculate Pi: Difference between revisions

Content added Content deleted
m (Fixed typo)
Line 716: Line 716:
'A G' =. X
'A G' =. X
PI =: A * A % Z
PI =: A * A % Z
smoutput (0j100":PI) , 4 ": I
echo (0j100":PI) , 4 ": I
end.
end.
PI
PI