Kahan summation: Difference between revisions
→{{header|Modula-2}}
(added Phix) |
|||
Line 961:
Kahan sum = 1.0</pre>
=={{header|Modula-2}}==
<lang modula2>MODULE KahanSummation;
FROM RealStr IMPORT RealToStr;
Line 1,025 ⟶ 1,024:
ReadChar;
END KahanSummation.</lang>
{{out}}
<pre>Epsilon = 1.1102230E-16
(a + b) + c = 1.00000000
Kahan sum = 1.00000000</pre>
=={{header|PARI/GP}}==
|