
(FPCore (a b angle) :precision binary64 (let* ((t_0 (* (/ angle 180.0) PI))) (+ (pow (* a (sin t_0)) 2.0) (pow (* b (cos t_0)) 2.0))))
double code(double a, double b, double angle) {
double t_0 = (angle / 180.0) * ((double) M_PI);
return pow((a * sin(t_0)), 2.0) + pow((b * cos(t_0)), 2.0);
}
public static double code(double a, double b, double angle) {
double t_0 = (angle / 180.0) * Math.PI;
return Math.pow((a * Math.sin(t_0)), 2.0) + Math.pow((b * Math.cos(t_0)), 2.0);
}
def code(a, b, angle): t_0 = (angle / 180.0) * math.pi return math.pow((a * math.sin(t_0)), 2.0) + math.pow((b * math.cos(t_0)), 2.0)
function code(a, b, angle) t_0 = Float64(Float64(angle / 180.0) * pi) return Float64((Float64(a * sin(t_0)) ^ 2.0) + (Float64(b * cos(t_0)) ^ 2.0)) end
function tmp = code(a, b, angle) t_0 = (angle / 180.0) * pi; tmp = ((a * sin(t_0)) ^ 2.0) + ((b * cos(t_0)) ^ 2.0); end
code[a_, b_, angle_] := Block[{t$95$0 = N[(N[(angle / 180.0), $MachinePrecision] * Pi), $MachinePrecision]}, N[(N[Power[N[(a * N[Sin[t$95$0], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[Power[N[(b * N[Cos[t$95$0], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{angle}{180} \cdot \pi\\
{\left(a \cdot \sin t\_0\right)}^{2} + {\left(b \cdot \cos t\_0\right)}^{2}
\end{array}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 10 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (a b angle) :precision binary64 (let* ((t_0 (* (/ angle 180.0) PI))) (+ (pow (* a (sin t_0)) 2.0) (pow (* b (cos t_0)) 2.0))))
double code(double a, double b, double angle) {
double t_0 = (angle / 180.0) * ((double) M_PI);
return pow((a * sin(t_0)), 2.0) + pow((b * cos(t_0)), 2.0);
}
public static double code(double a, double b, double angle) {
double t_0 = (angle / 180.0) * Math.PI;
return Math.pow((a * Math.sin(t_0)), 2.0) + Math.pow((b * Math.cos(t_0)), 2.0);
}
def code(a, b, angle): t_0 = (angle / 180.0) * math.pi return math.pow((a * math.sin(t_0)), 2.0) + math.pow((b * math.cos(t_0)), 2.0)
function code(a, b, angle) t_0 = Float64(Float64(angle / 180.0) * pi) return Float64((Float64(a * sin(t_0)) ^ 2.0) + (Float64(b * cos(t_0)) ^ 2.0)) end
function tmp = code(a, b, angle) t_0 = (angle / 180.0) * pi; tmp = ((a * sin(t_0)) ^ 2.0) + ((b * cos(t_0)) ^ 2.0); end
code[a_, b_, angle_] := Block[{t$95$0 = N[(N[(angle / 180.0), $MachinePrecision] * Pi), $MachinePrecision]}, N[(N[Power[N[(a * N[Sin[t$95$0], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[Power[N[(b * N[Cos[t$95$0], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{angle}{180} \cdot \pi\\
{\left(a \cdot \sin t\_0\right)}^{2} + {\left(b \cdot \cos t\_0\right)}^{2}
\end{array}
\end{array}
angle_m = (fabs.f64 angle)
(FPCore (a b angle_m)
:precision binary64
(let* ((t_0 (fma (* angle_m PI) 0.005555555555555556 1.0)))
(+
(pow (* a (sin (pow (/ (/ 180.0 angle_m) PI) -1.0))) 2.0)
(pow (* b (fma (cos t_0) (cos 1.0) (* (sin t_0) (sin 1.0)))) 2.0))))angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
double t_0 = fma((angle_m * ((double) M_PI)), 0.005555555555555556, 1.0);
return pow((a * sin(pow(((180.0 / angle_m) / ((double) M_PI)), -1.0))), 2.0) + pow((b * fma(cos(t_0), cos(1.0), (sin(t_0) * sin(1.0)))), 2.0);
}
angle_m = abs(angle) function code(a, b, angle_m) t_0 = fma(Float64(angle_m * pi), 0.005555555555555556, 1.0) return Float64((Float64(a * sin((Float64(Float64(180.0 / angle_m) / pi) ^ -1.0))) ^ 2.0) + (Float64(b * fma(cos(t_0), cos(1.0), Float64(sin(t_0) * sin(1.0)))) ^ 2.0)) end
angle_m = N[Abs[angle], $MachinePrecision]
code[a_, b_, angle$95$m_] := Block[{t$95$0 = N[(N[(angle$95$m * Pi), $MachinePrecision] * 0.005555555555555556 + 1.0), $MachinePrecision]}, N[(N[Power[N[(a * N[Sin[N[Power[N[(N[(180.0 / angle$95$m), $MachinePrecision] / Pi), $MachinePrecision], -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[Power[N[(b * N[(N[Cos[t$95$0], $MachinePrecision] * N[Cos[1.0], $MachinePrecision] + N[(N[Sin[t$95$0], $MachinePrecision] * N[Sin[1.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
angle_m = \left|angle\right|
\\
\begin{array}{l}
t_0 := \mathsf{fma}\left(angle\_m \cdot \pi, 0.005555555555555556, 1\right)\\
{\left(a \cdot \sin \left({\left(\frac{\frac{180}{angle\_m}}{\pi}\right)}^{-1}\right)\right)}^{2} + {\left(b \cdot \mathsf{fma}\left(\cos t\_0, \cos 1, \sin t\_0 \cdot \sin 1\right)\right)}^{2}
\end{array}
\end{array}
Initial program 81.8%
*-commutative81.8%
clear-num81.8%
un-div-inv82.1%
Applied egg-rr82.1%
clear-num82.2%
inv-pow82.2%
Applied egg-rr82.2%
*-commutative82.2%
div-inv82.2%
metadata-eval82.2%
associate-*l*82.2%
expm1-log1p-u68.5%
expm1-undefine68.5%
cos-diff68.4%
Applied egg-rr82.2%
fma-define82.2%
fma-define82.2%
fma-define82.2%
Simplified82.2%
angle_m = (fabs.f64 angle)
(FPCore (a b angle_m)
:precision binary64
(let* ((t_0 (+ 1.0 (* (* angle_m PI) 0.005555555555555556))))
(+
(pow (* a (sin (pow (/ (/ 180.0 angle_m) PI) -1.0))) 2.0)
(pow (* b (+ (* (cos 1.0) (cos t_0)) (* (sin 1.0) (sin t_0)))) 2.0))))angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
double t_0 = 1.0 + ((angle_m * ((double) M_PI)) * 0.005555555555555556);
return pow((a * sin(pow(((180.0 / angle_m) / ((double) M_PI)), -1.0))), 2.0) + pow((b * ((cos(1.0) * cos(t_0)) + (sin(1.0) * sin(t_0)))), 2.0);
}
angle_m = Math.abs(angle);
public static double code(double a, double b, double angle_m) {
double t_0 = 1.0 + ((angle_m * Math.PI) * 0.005555555555555556);
return Math.pow((a * Math.sin(Math.pow(((180.0 / angle_m) / Math.PI), -1.0))), 2.0) + Math.pow((b * ((Math.cos(1.0) * Math.cos(t_0)) + (Math.sin(1.0) * Math.sin(t_0)))), 2.0);
}
angle_m = math.fabs(angle) def code(a, b, angle_m): t_0 = 1.0 + ((angle_m * math.pi) * 0.005555555555555556) return math.pow((a * math.sin(math.pow(((180.0 / angle_m) / math.pi), -1.0))), 2.0) + math.pow((b * ((math.cos(1.0) * math.cos(t_0)) + (math.sin(1.0) * math.sin(t_0)))), 2.0)
angle_m = abs(angle) function code(a, b, angle_m) t_0 = Float64(1.0 + Float64(Float64(angle_m * pi) * 0.005555555555555556)) return Float64((Float64(a * sin((Float64(Float64(180.0 / angle_m) / pi) ^ -1.0))) ^ 2.0) + (Float64(b * Float64(Float64(cos(1.0) * cos(t_0)) + Float64(sin(1.0) * sin(t_0)))) ^ 2.0)) end
angle_m = abs(angle); function tmp = code(a, b, angle_m) t_0 = 1.0 + ((angle_m * pi) * 0.005555555555555556); tmp = ((a * sin((((180.0 / angle_m) / pi) ^ -1.0))) ^ 2.0) + ((b * ((cos(1.0) * cos(t_0)) + (sin(1.0) * sin(t_0)))) ^ 2.0); end
angle_m = N[Abs[angle], $MachinePrecision]
code[a_, b_, angle$95$m_] := Block[{t$95$0 = N[(1.0 + N[(N[(angle$95$m * Pi), $MachinePrecision] * 0.005555555555555556), $MachinePrecision]), $MachinePrecision]}, N[(N[Power[N[(a * N[Sin[N[Power[N[(N[(180.0 / angle$95$m), $MachinePrecision] / Pi), $MachinePrecision], -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[Power[N[(b * N[(N[(N[Cos[1.0], $MachinePrecision] * N[Cos[t$95$0], $MachinePrecision]), $MachinePrecision] + N[(N[Sin[1.0], $MachinePrecision] * N[Sin[t$95$0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
angle_m = \left|angle\right|
\\
\begin{array}{l}
t_0 := 1 + \left(angle\_m \cdot \pi\right) \cdot 0.005555555555555556\\
{\left(a \cdot \sin \left({\left(\frac{\frac{180}{angle\_m}}{\pi}\right)}^{-1}\right)\right)}^{2} + {\left(b \cdot \left(\cos 1 \cdot \cos t\_0 + \sin 1 \cdot \sin t\_0\right)\right)}^{2}
\end{array}
\end{array}
Initial program 81.8%
*-commutative81.8%
clear-num81.8%
un-div-inv82.1%
Applied egg-rr82.1%
clear-num82.2%
inv-pow82.2%
Applied egg-rr82.2%
*-commutative82.2%
div-inv82.2%
metadata-eval82.2%
associate-*l*82.2%
expm1-log1p-u68.5%
expm1-undefine68.5%
cos-diff68.4%
Applied egg-rr82.2%
Final simplification82.2%
angle_m = (fabs.f64 angle) (FPCore (a b angle_m) :precision binary64 (+ (pow (* a (sin (/ PI (/ 180.0 angle_m)))) 2.0) (pow (* b (cos (* (/ angle_m 180.0) (pow (sqrt PI) 2.0)))) 2.0)))
angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
return pow((a * sin((((double) M_PI) / (180.0 / angle_m)))), 2.0) + pow((b * cos(((angle_m / 180.0) * pow(sqrt(((double) M_PI)), 2.0)))), 2.0);
}
angle_m = Math.abs(angle);
public static double code(double a, double b, double angle_m) {
return Math.pow((a * Math.sin((Math.PI / (180.0 / angle_m)))), 2.0) + Math.pow((b * Math.cos(((angle_m / 180.0) * Math.pow(Math.sqrt(Math.PI), 2.0)))), 2.0);
}
angle_m = math.fabs(angle) def code(a, b, angle_m): return math.pow((a * math.sin((math.pi / (180.0 / angle_m)))), 2.0) + math.pow((b * math.cos(((angle_m / 180.0) * math.pow(math.sqrt(math.pi), 2.0)))), 2.0)
angle_m = abs(angle) function code(a, b, angle_m) return Float64((Float64(a * sin(Float64(pi / Float64(180.0 / angle_m)))) ^ 2.0) + (Float64(b * cos(Float64(Float64(angle_m / 180.0) * (sqrt(pi) ^ 2.0)))) ^ 2.0)) end
angle_m = abs(angle); function tmp = code(a, b, angle_m) tmp = ((a * sin((pi / (180.0 / angle_m)))) ^ 2.0) + ((b * cos(((angle_m / 180.0) * (sqrt(pi) ^ 2.0)))) ^ 2.0); end
angle_m = N[Abs[angle], $MachinePrecision] code[a_, b_, angle$95$m_] := N[(N[Power[N[(a * N[Sin[N[(Pi / N[(180.0 / angle$95$m), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[Power[N[(b * N[Cos[N[(N[(angle$95$m / 180.0), $MachinePrecision] * N[Power[N[Sqrt[Pi], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
angle_m = \left|angle\right|
\\
{\left(a \cdot \sin \left(\frac{\pi}{\frac{180}{angle\_m}}\right)\right)}^{2} + {\left(b \cdot \cos \left(\frac{angle\_m}{180} \cdot {\left(\sqrt{\pi}\right)}^{2}\right)\right)}^{2}
\end{array}
Initial program 81.8%
*-commutative81.8%
clear-num81.8%
un-div-inv82.1%
Applied egg-rr82.1%
add-sqr-sqrt82.2%
pow282.2%
Applied egg-rr82.2%
angle_m = (fabs.f64 angle) (FPCore (a b angle_m) :precision binary64 (let* ((t_0 (* angle_m (* PI 0.005555555555555556))) (t_1 (cos t_0))) (fma (* t_1 (* b t_1)) b (pow (* a (sin t_0)) 2.0))))
angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
double t_0 = angle_m * (((double) M_PI) * 0.005555555555555556);
double t_1 = cos(t_0);
return fma((t_1 * (b * t_1)), b, pow((a * sin(t_0)), 2.0));
}
angle_m = abs(angle) function code(a, b, angle_m) t_0 = Float64(angle_m * Float64(pi * 0.005555555555555556)) t_1 = cos(t_0) return fma(Float64(t_1 * Float64(b * t_1)), b, (Float64(a * sin(t_0)) ^ 2.0)) end
angle_m = N[Abs[angle], $MachinePrecision]
code[a_, b_, angle$95$m_] := Block[{t$95$0 = N[(angle$95$m * N[(Pi * 0.005555555555555556), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[Cos[t$95$0], $MachinePrecision]}, N[(N[(t$95$1 * N[(b * t$95$1), $MachinePrecision]), $MachinePrecision] * b + N[Power[N[(a * N[Sin[t$95$0], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
angle_m = \left|angle\right|
\\
\begin{array}{l}
t_0 := angle\_m \cdot \left(\pi \cdot 0.005555555555555556\right)\\
t_1 := \cos t\_0\\
\mathsf{fma}\left(t\_1 \cdot \left(b \cdot t\_1\right), b, {\left(a \cdot \sin t\_0\right)}^{2}\right)
\end{array}
\end{array}
Initial program 81.8%
associate-*l/82.1%
associate-/l*82.1%
cos-neg82.1%
distribute-lft-neg-out82.1%
distribute-frac-neg82.1%
distribute-frac-neg82.1%
distribute-lft-neg-out82.1%
cos-neg82.1%
associate-*l/82.2%
associate-/l*82.2%
Simplified82.2%
Applied egg-rr82.2%
Final simplification82.2%
angle_m = (fabs.f64 angle) (FPCore (a b angle_m) :precision binary64 (+ (pow (* a (sin (pow (/ (/ 180.0 angle_m) PI) -1.0))) 2.0) (pow (* b (cos (* PI (/ angle_m 180.0)))) 2.0)))
angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
return pow((a * sin(pow(((180.0 / angle_m) / ((double) M_PI)), -1.0))), 2.0) + pow((b * cos((((double) M_PI) * (angle_m / 180.0)))), 2.0);
}
angle_m = Math.abs(angle);
public static double code(double a, double b, double angle_m) {
return Math.pow((a * Math.sin(Math.pow(((180.0 / angle_m) / Math.PI), -1.0))), 2.0) + Math.pow((b * Math.cos((Math.PI * (angle_m / 180.0)))), 2.0);
}
angle_m = math.fabs(angle) def code(a, b, angle_m): return math.pow((a * math.sin(math.pow(((180.0 / angle_m) / math.pi), -1.0))), 2.0) + math.pow((b * math.cos((math.pi * (angle_m / 180.0)))), 2.0)
angle_m = abs(angle) function code(a, b, angle_m) return Float64((Float64(a * sin((Float64(Float64(180.0 / angle_m) / pi) ^ -1.0))) ^ 2.0) + (Float64(b * cos(Float64(pi * Float64(angle_m / 180.0)))) ^ 2.0)) end
angle_m = abs(angle); function tmp = code(a, b, angle_m) tmp = ((a * sin((((180.0 / angle_m) / pi) ^ -1.0))) ^ 2.0) + ((b * cos((pi * (angle_m / 180.0)))) ^ 2.0); end
angle_m = N[Abs[angle], $MachinePrecision] code[a_, b_, angle$95$m_] := N[(N[Power[N[(a * N[Sin[N[Power[N[(N[(180.0 / angle$95$m), $MachinePrecision] / Pi), $MachinePrecision], -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[Power[N[(b * N[Cos[N[(Pi * N[(angle$95$m / 180.0), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
angle_m = \left|angle\right|
\\
{\left(a \cdot \sin \left({\left(\frac{\frac{180}{angle\_m}}{\pi}\right)}^{-1}\right)\right)}^{2} + {\left(b \cdot \cos \left(\pi \cdot \frac{angle\_m}{180}\right)\right)}^{2}
\end{array}
Initial program 81.8%
*-commutative81.8%
clear-num81.8%
un-div-inv82.1%
Applied egg-rr82.1%
clear-num82.2%
inv-pow82.2%
Applied egg-rr82.2%
Final simplification82.2%
angle_m = (fabs.f64 angle) (FPCore (a b angle_m) :precision binary64 (let* ((t_0 (* angle_m (* PI 0.005555555555555556)))) (pow (hypot (* a (sin t_0)) (* b (cos t_0))) 2.0)))
angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
double t_0 = angle_m * (((double) M_PI) * 0.005555555555555556);
return pow(hypot((a * sin(t_0)), (b * cos(t_0))), 2.0);
}
angle_m = Math.abs(angle);
public static double code(double a, double b, double angle_m) {
double t_0 = angle_m * (Math.PI * 0.005555555555555556);
return Math.pow(Math.hypot((a * Math.sin(t_0)), (b * Math.cos(t_0))), 2.0);
}
angle_m = math.fabs(angle) def code(a, b, angle_m): t_0 = angle_m * (math.pi * 0.005555555555555556) return math.pow(math.hypot((a * math.sin(t_0)), (b * math.cos(t_0))), 2.0)
angle_m = abs(angle) function code(a, b, angle_m) t_0 = Float64(angle_m * Float64(pi * 0.005555555555555556)) return hypot(Float64(a * sin(t_0)), Float64(b * cos(t_0))) ^ 2.0 end
angle_m = abs(angle); function tmp = code(a, b, angle_m) t_0 = angle_m * (pi * 0.005555555555555556); tmp = hypot((a * sin(t_0)), (b * cos(t_0))) ^ 2.0; end
angle_m = N[Abs[angle], $MachinePrecision]
code[a_, b_, angle$95$m_] := Block[{t$95$0 = N[(angle$95$m * N[(Pi * 0.005555555555555556), $MachinePrecision]), $MachinePrecision]}, N[Power[N[Sqrt[N[(a * N[Sin[t$95$0], $MachinePrecision]), $MachinePrecision] ^ 2 + N[(b * N[Cos[t$95$0], $MachinePrecision]), $MachinePrecision] ^ 2], $MachinePrecision], 2.0], $MachinePrecision]]
\begin{array}{l}
angle_m = \left|angle\right|
\\
\begin{array}{l}
t_0 := angle\_m \cdot \left(\pi \cdot 0.005555555555555556\right)\\
{\left(\mathsf{hypot}\left(a \cdot \sin t\_0, b \cdot \cos t\_0\right)\right)}^{2}
\end{array}
\end{array}
Initial program 81.8%
associate-*l/82.1%
associate-/l*82.1%
cos-neg82.1%
distribute-lft-neg-out82.1%
distribute-frac-neg82.1%
distribute-frac-neg82.1%
distribute-lft-neg-out82.1%
cos-neg82.1%
associate-*l/82.2%
associate-/l*82.2%
Simplified82.2%
associate-*r/82.1%
associate-*l/81.8%
unpow281.8%
associate-*r/81.8%
associate-*l/81.8%
unpow281.8%
unpow281.8%
unpow281.8%
Applied egg-rr82.2%
Final simplification82.2%
angle_m = (fabs.f64 angle) (FPCore (a b angle_m) :precision binary64 (+ (pow (* a (sin (pow (/ (/ 180.0 angle_m) PI) -1.0))) 2.0) (pow b 2.0)))
angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
return pow((a * sin(pow(((180.0 / angle_m) / ((double) M_PI)), -1.0))), 2.0) + pow(b, 2.0);
}
angle_m = Math.abs(angle);
public static double code(double a, double b, double angle_m) {
return Math.pow((a * Math.sin(Math.pow(((180.0 / angle_m) / Math.PI), -1.0))), 2.0) + Math.pow(b, 2.0);
}
angle_m = math.fabs(angle) def code(a, b, angle_m): return math.pow((a * math.sin(math.pow(((180.0 / angle_m) / math.pi), -1.0))), 2.0) + math.pow(b, 2.0)
angle_m = abs(angle) function code(a, b, angle_m) return Float64((Float64(a * sin((Float64(Float64(180.0 / angle_m) / pi) ^ -1.0))) ^ 2.0) + (b ^ 2.0)) end
angle_m = abs(angle); function tmp = code(a, b, angle_m) tmp = ((a * sin((((180.0 / angle_m) / pi) ^ -1.0))) ^ 2.0) + (b ^ 2.0); end
angle_m = N[Abs[angle], $MachinePrecision] code[a_, b_, angle$95$m_] := N[(N[Power[N[(a * N[Sin[N[Power[N[(N[(180.0 / angle$95$m), $MachinePrecision] / Pi), $MachinePrecision], -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[Power[b, 2.0], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
angle_m = \left|angle\right|
\\
{\left(a \cdot \sin \left({\left(\frac{\frac{180}{angle\_m}}{\pi}\right)}^{-1}\right)\right)}^{2} + {b}^{2}
\end{array}
Initial program 81.8%
*-commutative81.8%
clear-num81.8%
un-div-inv82.1%
Applied egg-rr82.1%
clear-num82.2%
inv-pow82.2%
Applied egg-rr82.2%
Taylor expanded in angle around 0 82.1%
Final simplification82.1%
angle_m = (fabs.f64 angle) (FPCore (a b angle_m) :precision binary64 (fma b b (pow (* a (sin (* angle_m (* PI 0.005555555555555556)))) 2.0)))
angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
return fma(b, b, pow((a * sin((angle_m * (((double) M_PI) * 0.005555555555555556)))), 2.0));
}
angle_m = abs(angle) function code(a, b, angle_m) return fma(b, b, (Float64(a * sin(Float64(angle_m * Float64(pi * 0.005555555555555556)))) ^ 2.0)) end
angle_m = N[Abs[angle], $MachinePrecision] code[a_, b_, angle$95$m_] := N[(b * b + N[Power[N[(a * N[Sin[N[(angle$95$m * N[(Pi * 0.005555555555555556), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
angle_m = \left|angle\right|
\\
\mathsf{fma}\left(b, b, {\left(a \cdot \sin \left(angle\_m \cdot \left(\pi \cdot 0.005555555555555556\right)\right)\right)}^{2}\right)
\end{array}
Initial program 81.8%
associate-*l/82.1%
associate-/l*82.1%
cos-neg82.1%
distribute-lft-neg-out82.1%
distribute-frac-neg82.1%
distribute-frac-neg82.1%
distribute-lft-neg-out82.1%
cos-neg82.1%
associate-*l/82.2%
associate-/l*82.2%
Simplified82.2%
Applied egg-rr82.2%
Taylor expanded in angle around 0 82.1%
angle_m = (fabs.f64 angle) (FPCore (a b angle_m) :precision binary64 (if (<= a 7.2e+106) (* b b) (pow (* a (sin (* (* angle_m PI) 0.005555555555555556))) 2.0)))
angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
double tmp;
if (a <= 7.2e+106) {
tmp = b * b;
} else {
tmp = pow((a * sin(((angle_m * ((double) M_PI)) * 0.005555555555555556))), 2.0);
}
return tmp;
}
angle_m = Math.abs(angle);
public static double code(double a, double b, double angle_m) {
double tmp;
if (a <= 7.2e+106) {
tmp = b * b;
} else {
tmp = Math.pow((a * Math.sin(((angle_m * Math.PI) * 0.005555555555555556))), 2.0);
}
return tmp;
}
angle_m = math.fabs(angle) def code(a, b, angle_m): tmp = 0 if a <= 7.2e+106: tmp = b * b else: tmp = math.pow((a * math.sin(((angle_m * math.pi) * 0.005555555555555556))), 2.0) return tmp
angle_m = abs(angle) function code(a, b, angle_m) tmp = 0.0 if (a <= 7.2e+106) tmp = Float64(b * b); else tmp = Float64(a * sin(Float64(Float64(angle_m * pi) * 0.005555555555555556))) ^ 2.0; end return tmp end
angle_m = abs(angle); function tmp_2 = code(a, b, angle_m) tmp = 0.0; if (a <= 7.2e+106) tmp = b * b; else tmp = (a * sin(((angle_m * pi) * 0.005555555555555556))) ^ 2.0; end tmp_2 = tmp; end
angle_m = N[Abs[angle], $MachinePrecision] code[a_, b_, angle$95$m_] := If[LessEqual[a, 7.2e+106], N[(b * b), $MachinePrecision], N[Power[N[(a * N[Sin[N[(N[(angle$95$m * Pi), $MachinePrecision] * 0.005555555555555556), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]]
\begin{array}{l}
angle_m = \left|angle\right|
\\
\begin{array}{l}
\mathbf{if}\;a \leq 7.2 \cdot 10^{+106}:\\
\;\;\;\;b \cdot b\\
\mathbf{else}:\\
\;\;\;\;{\left(a \cdot \sin \left(\left(angle\_m \cdot \pi\right) \cdot 0.005555555555555556\right)\right)}^{2}\\
\end{array}
\end{array}
if a < 7.2000000000000002e106Initial program 79.2%
associate-*l/79.6%
associate-/l*79.7%
cos-neg79.7%
distribute-lft-neg-out79.7%
distribute-frac-neg79.7%
distribute-frac-neg79.7%
distribute-lft-neg-out79.7%
cos-neg79.7%
associate-*l/79.7%
associate-/l*79.7%
Simplified79.7%
Taylor expanded in angle around 0 61.5%
unpow261.5%
Applied egg-rr61.5%
if 7.2000000000000002e106 < a Initial program 92.9%
associate-*l/92.8%
associate-/l*92.8%
cos-neg92.8%
distribute-lft-neg-out92.8%
distribute-frac-neg92.8%
distribute-frac-neg92.8%
distribute-lft-neg-out92.8%
cos-neg92.8%
associate-*l/92.8%
associate-/l*92.8%
Simplified92.8%
Applied egg-rr89.9%
Applied egg-rr56.5%
Taylor expanded in b around 0 56.5%
*-commutative56.5%
associate-*r*56.4%
*-commutative56.4%
*-commutative56.4%
unpow256.4%
unpow256.4%
swap-sqr73.1%
unpow273.1%
*-commutative73.1%
*-commutative73.1%
associate-*r*73.2%
*-commutative73.2%
Simplified73.2%
Final simplification63.7%
angle_m = (fabs.f64 angle) (FPCore (a b angle_m) :precision binary64 (* b b))
angle_m = fabs(angle);
double code(double a, double b, double angle_m) {
return b * b;
}
angle_m = abs(angle)
real(8) function code(a, b, angle_m)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: angle_m
code = b * b
end function
angle_m = Math.abs(angle);
public static double code(double a, double b, double angle_m) {
return b * b;
}
angle_m = math.fabs(angle) def code(a, b, angle_m): return b * b
angle_m = abs(angle) function code(a, b, angle_m) return Float64(b * b) end
angle_m = abs(angle); function tmp = code(a, b, angle_m) tmp = b * b; end
angle_m = N[Abs[angle], $MachinePrecision] code[a_, b_, angle$95$m_] := N[(b * b), $MachinePrecision]
\begin{array}{l}
angle_m = \left|angle\right|
\\
b \cdot b
\end{array}
Initial program 81.8%
associate-*l/82.1%
associate-/l*82.1%
cos-neg82.1%
distribute-lft-neg-out82.1%
distribute-frac-neg82.1%
distribute-frac-neg82.1%
distribute-lft-neg-out82.1%
cos-neg82.1%
associate-*l/82.2%
associate-/l*82.2%
Simplified82.2%
Taylor expanded in angle around 0 56.6%
unpow256.6%
Applied egg-rr56.6%
herbie shell --seed 2024110
(FPCore (a b angle)
:name "ab-angle->ABCF A"
:precision binary64
(+ (pow (* a (sin (* (/ angle 180.0) PI))) 2.0) (pow (* b (cos (* (/ angle 180.0) PI))) 2.0)))