Make sqrt return the *principal* square root in accordance with the spec

sorear · Sep 1, 2011 · d3b0031 · d3b0031
1 parent 252c6a5
commit d3b0031
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/lib/Builtins.cs b/lib/Builtins.cs
@@ -1164,7 +1164,6 @@ class SubstrLValue: Variable {
         if (r1 == NR_COMPLEX) {
             Complex v1 = PromoteToComplex(r1, n1);
             double angle = Math.Atan2(v1.im, v1.re) / 2;
-            if (angle < 0) angle += Math.PI;
             double mag = Math.Sqrt(Math.Sqrt(v1.im*v1.im + v1.re*v1.re));
             return MakeComplex(mag * Math.Cos(angle), mag * Math.Sin(angle));
         } else {