
(FPCore (g h) :precision binary64 (* 2.0 (cos (+ (/ (* 2.0 PI) 3.0) (/ (acos (/ (- g) h)) 3.0)))))
double code(double g, double h) {
return 2.0 * cos((((2.0 * ((double) M_PI)) / 3.0) + (acos((-g / h)) / 3.0)));
}
public static double code(double g, double h) {
return 2.0 * Math.cos((((2.0 * Math.PI) / 3.0) + (Math.acos((-g / h)) / 3.0)));
}
def code(g, h): return 2.0 * math.cos((((2.0 * math.pi) / 3.0) + (math.acos((-g / h)) / 3.0)))
function code(g, h) return Float64(2.0 * cos(Float64(Float64(Float64(2.0 * pi) / 3.0) + Float64(acos(Float64(Float64(-g) / h)) / 3.0)))) end
function tmp = code(g, h) tmp = 2.0 * cos((((2.0 * pi) / 3.0) + (acos((-g / h)) / 3.0))); end
code[g_, h_] := N[(2.0 * N[Cos[N[(N[(N[(2.0 * Pi), $MachinePrecision] / 3.0), $MachinePrecision] + N[(N[ArcCos[N[((-g) / h), $MachinePrecision]], $MachinePrecision] / 3.0), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
2 \cdot \cos \left(\frac{2 \cdot \pi}{3} + \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right)
\end{array}
Herbie found 2 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (g h) :precision binary64 (* 2.0 (cos (+ (/ (* 2.0 PI) 3.0) (/ (acos (/ (- g) h)) 3.0)))))
double code(double g, double h) {
return 2.0 * cos((((2.0 * ((double) M_PI)) / 3.0) + (acos((-g / h)) / 3.0)));
}
public static double code(double g, double h) {
return 2.0 * Math.cos((((2.0 * Math.PI) / 3.0) + (Math.acos((-g / h)) / 3.0)));
}
def code(g, h): return 2.0 * math.cos((((2.0 * math.pi) / 3.0) + (math.acos((-g / h)) / 3.0)))
function code(g, h) return Float64(2.0 * cos(Float64(Float64(Float64(2.0 * pi) / 3.0) + Float64(acos(Float64(Float64(-g) / h)) / 3.0)))) end
function tmp = code(g, h) tmp = 2.0 * cos((((2.0 * pi) / 3.0) + (acos((-g / h)) / 3.0))); end
code[g_, h_] := N[(2.0 * N[Cos[N[(N[(N[(2.0 * Pi), $MachinePrecision] / 3.0), $MachinePrecision] + N[(N[ArcCos[N[((-g) / h), $MachinePrecision]], $MachinePrecision] / 3.0), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
2 \cdot \cos \left(\frac{2 \cdot \pi}{3} + \frac{\cos^{-1} \left(\frac{-g}{h}\right)}{3}\right)
\end{array}
(FPCore (g h) :precision binary64 (* 2.0 (sin (/ (- (* PI (- 1.5 2.0)) (acos (- (/ g h)))) 3.0))))
double code(double g, double h) {
return 2.0 * sin((((((double) M_PI) * (1.5 - 2.0)) - acos(-(g / h))) / 3.0));
}
public static double code(double g, double h) {
return 2.0 * Math.sin((((Math.PI * (1.5 - 2.0)) - Math.acos(-(g / h))) / 3.0));
}
def code(g, h): return 2.0 * math.sin((((math.pi * (1.5 - 2.0)) - math.acos(-(g / h))) / 3.0))
function code(g, h) return Float64(2.0 * sin(Float64(Float64(Float64(pi * Float64(1.5 - 2.0)) - acos(Float64(-Float64(g / h)))) / 3.0))) end
function tmp = code(g, h) tmp = 2.0 * sin((((pi * (1.5 - 2.0)) - acos(-(g / h))) / 3.0)); end
code[g_, h_] := N[(2.0 * N[Sin[N[(N[(N[(Pi * N[(1.5 - 2.0), $MachinePrecision]), $MachinePrecision] - N[ArcCos[(-N[(g / h), $MachinePrecision])], $MachinePrecision]), $MachinePrecision] / 3.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
2 \cdot \sin \left(\frac{\pi \cdot \left(1.5 - 2\right) - \cos^{-1} \left(-\frac{g}{h}\right)}{3}\right)
\end{array}
Initial program 98.5%
Applied rewrites98.5%
Applied rewrites100.0%
Taylor expanded in g around 0
Applied rewrites100.0%
Applied rewrites100.0%
(FPCore (g h) :precision binary64 (* (cos (/ (fma PI 2.0 (acos (- (/ g h)))) 3.0)) 2.0))
double code(double g, double h) {
return cos((fma(((double) M_PI), 2.0, acos(-(g / h))) / 3.0)) * 2.0;
}
function code(g, h) return Float64(cos(Float64(fma(pi, 2.0, acos(Float64(-Float64(g / h)))) / 3.0)) * 2.0) end
code[g_, h_] := N[(N[Cos[N[(N[(Pi * 2.0 + N[ArcCos[(-N[(g / h), $MachinePrecision])], $MachinePrecision]), $MachinePrecision] / 3.0), $MachinePrecision]], $MachinePrecision] * 2.0), $MachinePrecision]
\begin{array}{l}
\\
\cos \left(\frac{\mathsf{fma}\left(\pi, 2, \cos^{-1} \left(-\frac{g}{h}\right)\right)}{3}\right) \cdot 2
\end{array}
Initial program 98.5%
Applied rewrites98.5%
herbie shell --seed 2025153
(FPCore (g h)
:name "2-ancestry mixing, negative discriminant"
:precision binary64
(* 2.0 (cos (+ (/ (* 2.0 PI) 3.0) (/ (acos (/ (- g) h)) 3.0)))))