
(FPCore (a b) :precision binary64 (* (* (/ PI 2.0) (/ 1.0 (- (* b b) (* a a)))) (- (/ 1.0 a) (/ 1.0 b))))
double code(double a, double b) {
return ((((double) M_PI) / 2.0) * (1.0 / ((b * b) - (a * a)))) * ((1.0 / a) - (1.0 / b));
}
public static double code(double a, double b) {
return ((Math.PI / 2.0) * (1.0 / ((b * b) - (a * a)))) * ((1.0 / a) - (1.0 / b));
}
def code(a, b): return ((math.pi / 2.0) * (1.0 / ((b * b) - (a * a)))) * ((1.0 / a) - (1.0 / b))
function code(a, b) return Float64(Float64(Float64(pi / 2.0) * Float64(1.0 / Float64(Float64(b * b) - Float64(a * a)))) * Float64(Float64(1.0 / a) - Float64(1.0 / b))) end
function tmp = code(a, b) tmp = ((pi / 2.0) * (1.0 / ((b * b) - (a * a)))) * ((1.0 / a) - (1.0 / b)); end
code[a_, b_] := N[(N[(N[(Pi / 2.0), $MachinePrecision] * N[(1.0 / N[(N[(b * b), $MachinePrecision] - N[(a * a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(1.0 / a), $MachinePrecision] - N[(1.0 / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(\frac{\pi}{2} \cdot \frac{1}{b \cdot b - a \cdot a}\right) \cdot \left(\frac{1}{a} - \frac{1}{b}\right)
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 12 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (a b) :precision binary64 (* (* (/ PI 2.0) (/ 1.0 (- (* b b) (* a a)))) (- (/ 1.0 a) (/ 1.0 b))))
double code(double a, double b) {
return ((((double) M_PI) / 2.0) * (1.0 / ((b * b) - (a * a)))) * ((1.0 / a) - (1.0 / b));
}
public static double code(double a, double b) {
return ((Math.PI / 2.0) * (1.0 / ((b * b) - (a * a)))) * ((1.0 / a) - (1.0 / b));
}
def code(a, b): return ((math.pi / 2.0) * (1.0 / ((b * b) - (a * a)))) * ((1.0 / a) - (1.0 / b))
function code(a, b) return Float64(Float64(Float64(pi / 2.0) * Float64(1.0 / Float64(Float64(b * b) - Float64(a * a)))) * Float64(Float64(1.0 / a) - Float64(1.0 / b))) end
function tmp = code(a, b) tmp = ((pi / 2.0) * (1.0 / ((b * b) - (a * a)))) * ((1.0 / a) - (1.0 / b)); end
code[a_, b_] := N[(N[(N[(Pi / 2.0), $MachinePrecision] * N[(1.0 / N[(N[(b * b), $MachinePrecision] - N[(a * a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(1.0 / a), $MachinePrecision] - N[(1.0 / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(\frac{\pi}{2} \cdot \frac{1}{b \cdot b - a \cdot a}\right) \cdot \left(\frac{1}{a} - \frac{1}{b}\right)
\end{array}
(FPCore (a b) :precision binary64 (/ (* (+ (/ 1.0 a) (/ -1.0 b)) (/ (* PI 0.5) (+ b a))) (- b a)))
double code(double a, double b) {
return (((1.0 / a) + (-1.0 / b)) * ((((double) M_PI) * 0.5) / (b + a))) / (b - a);
}
public static double code(double a, double b) {
return (((1.0 / a) + (-1.0 / b)) * ((Math.PI * 0.5) / (b + a))) / (b - a);
}
def code(a, b): return (((1.0 / a) + (-1.0 / b)) * ((math.pi * 0.5) / (b + a))) / (b - a)
function code(a, b) return Float64(Float64(Float64(Float64(1.0 / a) + Float64(-1.0 / b)) * Float64(Float64(pi * 0.5) / Float64(b + a))) / Float64(b - a)) end
function tmp = code(a, b) tmp = (((1.0 / a) + (-1.0 / b)) * ((pi * 0.5) / (b + a))) / (b - a); end
code[a_, b_] := N[(N[(N[(N[(1.0 / a), $MachinePrecision] + N[(-1.0 / b), $MachinePrecision]), $MachinePrecision] * N[(N[(Pi * 0.5), $MachinePrecision] / N[(b + a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\left(\frac{1}{a} + \frac{-1}{b}\right) \cdot \frac{\pi \cdot 0.5}{b + a}}{b - a}
\end{array}
Initial program 81.4%
un-div-inv81.4%
difference-of-squares89.6%
associate-/r*89.9%
div-inv89.9%
metadata-eval89.9%
Applied egg-rr89.9%
associate-*l/99.6%
Applied egg-rr99.6%
Final simplification99.6%
(FPCore (a b)
:precision binary64
(if (<= a -2.4e+112)
(/ (/ (* PI -0.5) (* b a)) (- b a))
(if (<= a -1.1e-170)
(* (* PI 0.5) (/ (+ (/ 1.0 a) (/ -1.0 b)) (- (* b b) (* a a))))
(/ (/ (/ (* PI 0.5) a) (+ b a)) (- b a)))))
double code(double a, double b) {
double tmp;
if (a <= -2.4e+112) {
tmp = ((((double) M_PI) * -0.5) / (b * a)) / (b - a);
} else if (a <= -1.1e-170) {
tmp = (((double) M_PI) * 0.5) * (((1.0 / a) + (-1.0 / b)) / ((b * b) - (a * a)));
} else {
tmp = (((((double) M_PI) * 0.5) / a) / (b + a)) / (b - a);
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -2.4e+112) {
tmp = ((Math.PI * -0.5) / (b * a)) / (b - a);
} else if (a <= -1.1e-170) {
tmp = (Math.PI * 0.5) * (((1.0 / a) + (-1.0 / b)) / ((b * b) - (a * a)));
} else {
tmp = (((Math.PI * 0.5) / a) / (b + a)) / (b - a);
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -2.4e+112: tmp = ((math.pi * -0.5) / (b * a)) / (b - a) elif a <= -1.1e-170: tmp = (math.pi * 0.5) * (((1.0 / a) + (-1.0 / b)) / ((b * b) - (a * a))) else: tmp = (((math.pi * 0.5) / a) / (b + a)) / (b - a) return tmp
function code(a, b) tmp = 0.0 if (a <= -2.4e+112) tmp = Float64(Float64(Float64(pi * -0.5) / Float64(b * a)) / Float64(b - a)); elseif (a <= -1.1e-170) tmp = Float64(Float64(pi * 0.5) * Float64(Float64(Float64(1.0 / a) + Float64(-1.0 / b)) / Float64(Float64(b * b) - Float64(a * a)))); else tmp = Float64(Float64(Float64(Float64(pi * 0.5) / a) / Float64(b + a)) / Float64(b - a)); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -2.4e+112) tmp = ((pi * -0.5) / (b * a)) / (b - a); elseif (a <= -1.1e-170) tmp = (pi * 0.5) * (((1.0 / a) + (-1.0 / b)) / ((b * b) - (a * a))); else tmp = (((pi * 0.5) / a) / (b + a)) / (b - a); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -2.4e+112], N[(N[(N[(Pi * -0.5), $MachinePrecision] / N[(b * a), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, -1.1e-170], N[(N[(Pi * 0.5), $MachinePrecision] * N[(N[(N[(1.0 / a), $MachinePrecision] + N[(-1.0 / b), $MachinePrecision]), $MachinePrecision] / N[(N[(b * b), $MachinePrecision] - N[(a * a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(Pi * 0.5), $MachinePrecision] / a), $MachinePrecision] / N[(b + a), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -2.4 \cdot 10^{+112}:\\
\;\;\;\;\frac{\frac{\pi \cdot -0.5}{b \cdot a}}{b - a}\\
\mathbf{elif}\;a \leq -1.1 \cdot 10^{-170}:\\
\;\;\;\;\left(\pi \cdot 0.5\right) \cdot \frac{\frac{1}{a} + \frac{-1}{b}}{b \cdot b - a \cdot a}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\frac{\pi \cdot 0.5}{a}}{b + a}}{b - a}\\
\end{array}
\end{array}
if a < -2.4e112Initial program 69.4%
un-div-inv69.4%
difference-of-squares90.6%
associate-/r*90.6%
div-inv90.6%
metadata-eval90.6%
Applied egg-rr90.6%
associate-*l/99.9%
Applied egg-rr99.9%
Taylor expanded in b around 0 99.9%
associate-*r/99.9%
Simplified99.9%
if -2.4e112 < a < -1.10000000000000007e-170Initial program 95.0%
associate-*l*94.8%
*-rgt-identity94.8%
associate-/l*94.8%
metadata-eval94.8%
associate-*l/95.0%
*-lft-identity95.0%
sub-neg95.0%
distribute-neg-frac95.0%
metadata-eval95.0%
Simplified95.0%
if -1.10000000000000007e-170 < a Initial program 78.8%
associate-*l*78.8%
*-rgt-identity78.8%
associate-/l*78.8%
metadata-eval78.8%
associate-*l/78.8%
*-lft-identity78.8%
sub-neg78.8%
distribute-neg-frac78.8%
metadata-eval78.8%
Simplified78.8%
metadata-eval78.8%
div-inv78.8%
associate-*r/78.7%
*-commutative78.7%
difference-of-squares87.3%
associate-/r*99.7%
Applied egg-rr74.9%
Taylor expanded in a around inf 75.0%
distribute-lft-out75.0%
Simplified75.0%
Taylor expanded in a around 0 77.3%
*-commutative77.3%
associate-*l/77.3%
Simplified77.3%
Final simplification84.4%
(FPCore (a b) :precision binary64 (if (<= a -2.65e-110) (/ (/ (* PI 0.5) (+ b a)) (* b (- a b))) (/ (/ (* 0.5 (+ (/ PI a) (/ (* PI -2.0) b))) b) (- b a))))
double code(double a, double b) {
double tmp;
if (a <= -2.65e-110) {
tmp = ((((double) M_PI) * 0.5) / (b + a)) / (b * (a - b));
} else {
tmp = ((0.5 * ((((double) M_PI) / a) + ((((double) M_PI) * -2.0) / b))) / b) / (b - a);
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -2.65e-110) {
tmp = ((Math.PI * 0.5) / (b + a)) / (b * (a - b));
} else {
tmp = ((0.5 * ((Math.PI / a) + ((Math.PI * -2.0) / b))) / b) / (b - a);
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -2.65e-110: tmp = ((math.pi * 0.5) / (b + a)) / (b * (a - b)) else: tmp = ((0.5 * ((math.pi / a) + ((math.pi * -2.0) / b))) / b) / (b - a) return tmp
function code(a, b) tmp = 0.0 if (a <= -2.65e-110) tmp = Float64(Float64(Float64(pi * 0.5) / Float64(b + a)) / Float64(b * Float64(a - b))); else tmp = Float64(Float64(Float64(0.5 * Float64(Float64(pi / a) + Float64(Float64(pi * -2.0) / b))) / b) / Float64(b - a)); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -2.65e-110) tmp = ((pi * 0.5) / (b + a)) / (b * (a - b)); else tmp = ((0.5 * ((pi / a) + ((pi * -2.0) / b))) / b) / (b - a); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -2.65e-110], N[(N[(N[(Pi * 0.5), $MachinePrecision] / N[(b + a), $MachinePrecision]), $MachinePrecision] / N[(b * N[(a - b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(0.5 * N[(N[(Pi / a), $MachinePrecision] + N[(N[(Pi * -2.0), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -2.65 \cdot 10^{-110}:\\
\;\;\;\;\frac{\frac{\pi \cdot 0.5}{b + a}}{b \cdot \left(a - b\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{0.5 \cdot \left(\frac{\pi}{a} + \frac{\pi \cdot -2}{b}\right)}{b}}{b - a}\\
\end{array}
\end{array}
if a < -2.65e-110Initial program 84.3%
un-div-inv84.3%
difference-of-squares93.4%
associate-/r*94.4%
div-inv94.4%
metadata-eval94.4%
Applied egg-rr94.4%
Taylor expanded in a around inf 81.1%
frac-times85.0%
associate-/l*85.0%
Applied egg-rr85.0%
*-commutative85.0%
mul-1-neg85.0%
associate-*r/85.0%
+-commutative85.0%
*-commutative85.0%
Simplified85.0%
if -2.65e-110 < a Initial program 80.1%
un-div-inv80.2%
difference-of-squares88.0%
associate-/r*87.9%
div-inv87.9%
metadata-eval87.9%
Applied egg-rr87.9%
associate-*l/99.6%
Applied egg-rr99.6%
Taylor expanded in b around inf 68.8%
distribute-lft-out68.8%
sub-neg68.8%
mul-1-neg68.8%
distribute-rgt-out68.8%
metadata-eval68.8%
Simplified68.8%
Final simplification73.7%
(FPCore (a b) :precision binary64 (* (* PI (/ 0.5 (+ b a))) (/ (+ (/ 1.0 a) (/ -1.0 b)) (- b a))))
double code(double a, double b) {
return (((double) M_PI) * (0.5 / (b + a))) * (((1.0 / a) + (-1.0 / b)) / (b - a));
}
public static double code(double a, double b) {
return (Math.PI * (0.5 / (b + a))) * (((1.0 / a) + (-1.0 / b)) / (b - a));
}
def code(a, b): return (math.pi * (0.5 / (b + a))) * (((1.0 / a) + (-1.0 / b)) / (b - a))
function code(a, b) return Float64(Float64(pi * Float64(0.5 / Float64(b + a))) * Float64(Float64(Float64(1.0 / a) + Float64(-1.0 / b)) / Float64(b - a))) end
function tmp = code(a, b) tmp = (pi * (0.5 / (b + a))) * (((1.0 / a) + (-1.0 / b)) / (b - a)); end
code[a_, b_] := N[(N[(Pi * N[(0.5 / N[(b + a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(N[(1.0 / a), $MachinePrecision] + N[(-1.0 / b), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(\pi \cdot \frac{0.5}{b + a}\right) \cdot \frac{\frac{1}{a} + \frac{-1}{b}}{b - a}
\end{array}
Initial program 81.4%
un-div-inv81.4%
difference-of-squares89.6%
associate-/r*89.9%
div-inv89.9%
metadata-eval89.9%
Applied egg-rr89.9%
associate-*l/99.6%
Applied egg-rr99.6%
associate-/l*99.6%
associate-*r/99.6%
+-commutative99.6%
sub-neg99.6%
distribute-neg-frac99.6%
metadata-eval99.6%
Simplified99.6%
Final simplification99.6%
(FPCore (a b) :precision binary64 (if (<= a -2.65e-110) (/ (/ (/ (* PI -0.5) b) (+ b a)) (- b a)) (* (/ 1.0 b) (* 0.5 (/ (/ PI a) b)))))
double code(double a, double b) {
double tmp;
if (a <= -2.65e-110) {
tmp = (((((double) M_PI) * -0.5) / b) / (b + a)) / (b - a);
} else {
tmp = (1.0 / b) * (0.5 * ((((double) M_PI) / a) / b));
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -2.65e-110) {
tmp = (((Math.PI * -0.5) / b) / (b + a)) / (b - a);
} else {
tmp = (1.0 / b) * (0.5 * ((Math.PI / a) / b));
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -2.65e-110: tmp = (((math.pi * -0.5) / b) / (b + a)) / (b - a) else: tmp = (1.0 / b) * (0.5 * ((math.pi / a) / b)) return tmp
function code(a, b) tmp = 0.0 if (a <= -2.65e-110) tmp = Float64(Float64(Float64(Float64(pi * -0.5) / b) / Float64(b + a)) / Float64(b - a)); else tmp = Float64(Float64(1.0 / b) * Float64(0.5 * Float64(Float64(pi / a) / b))); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -2.65e-110) tmp = (((pi * -0.5) / b) / (b + a)) / (b - a); else tmp = (1.0 / b) * (0.5 * ((pi / a) / b)); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -2.65e-110], N[(N[(N[(N[(Pi * -0.5), $MachinePrecision] / b), $MachinePrecision] / N[(b + a), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 / b), $MachinePrecision] * N[(0.5 * N[(N[(Pi / a), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -2.65 \cdot 10^{-110}:\\
\;\;\;\;\frac{\frac{\frac{\pi \cdot -0.5}{b}}{b + a}}{b - a}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{b} \cdot \left(0.5 \cdot \frac{\frac{\pi}{a}}{b}\right)\\
\end{array}
\end{array}
if a < -2.65e-110Initial program 84.3%
un-div-inv84.3%
difference-of-squares93.4%
associate-/r*94.4%
div-inv94.4%
metadata-eval94.4%
Applied egg-rr94.4%
associate-*l/99.7%
Applied egg-rr99.7%
associate-*l/99.6%
Applied egg-rr99.6%
Taylor expanded in a around inf 83.8%
associate-*r/85.1%
*-commutative85.1%
Simplified85.1%
if -2.65e-110 < a Initial program 80.1%
associate-*l*80.1%
*-rgt-identity80.1%
associate-/l*80.1%
metadata-eval80.1%
associate-*l/80.1%
*-lft-identity80.1%
sub-neg80.1%
distribute-neg-frac80.1%
metadata-eval80.1%
Simplified80.1%
metadata-eval80.1%
div-inv80.1%
associate-*r/80.1%
*-commutative80.1%
difference-of-squares87.9%
associate-/r*99.6%
Applied egg-rr75.4%
Taylor expanded in a around 0 75.5%
div-inv75.5%
associate-/r*75.4%
Applied egg-rr75.4%
Taylor expanded in b around inf 68.8%
Final simplification73.7%
(FPCore (a b) :precision binary64 (if (<= a -3.7e-103) (/ (/ (/ (* PI -0.5) b) (+ b a)) (- b a)) (/ (/ (/ (* PI 0.5) a) (+ b a)) (- b a))))
double code(double a, double b) {
double tmp;
if (a <= -3.7e-103) {
tmp = (((((double) M_PI) * -0.5) / b) / (b + a)) / (b - a);
} else {
tmp = (((((double) M_PI) * 0.5) / a) / (b + a)) / (b - a);
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -3.7e-103) {
tmp = (((Math.PI * -0.5) / b) / (b + a)) / (b - a);
} else {
tmp = (((Math.PI * 0.5) / a) / (b + a)) / (b - a);
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -3.7e-103: tmp = (((math.pi * -0.5) / b) / (b + a)) / (b - a) else: tmp = (((math.pi * 0.5) / a) / (b + a)) / (b - a) return tmp
function code(a, b) tmp = 0.0 if (a <= -3.7e-103) tmp = Float64(Float64(Float64(Float64(pi * -0.5) / b) / Float64(b + a)) / Float64(b - a)); else tmp = Float64(Float64(Float64(Float64(pi * 0.5) / a) / Float64(b + a)) / Float64(b - a)); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -3.7e-103) tmp = (((pi * -0.5) / b) / (b + a)) / (b - a); else tmp = (((pi * 0.5) / a) / (b + a)) / (b - a); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -3.7e-103], N[(N[(N[(N[(Pi * -0.5), $MachinePrecision] / b), $MachinePrecision] / N[(b + a), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(Pi * 0.5), $MachinePrecision] / a), $MachinePrecision] / N[(b + a), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -3.7 \cdot 10^{-103}:\\
\;\;\;\;\frac{\frac{\frac{\pi \cdot -0.5}{b}}{b + a}}{b - a}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\frac{\pi \cdot 0.5}{a}}{b + a}}{b - a}\\
\end{array}
\end{array}
if a < -3.6999999999999999e-103Initial program 84.5%
un-div-inv84.5%
difference-of-squares94.3%
associate-/r*94.2%
div-inv94.2%
metadata-eval94.2%
Applied egg-rr94.2%
associate-*l/99.7%
Applied egg-rr99.7%
associate-*l/99.6%
Applied egg-rr99.6%
Taylor expanded in a around inf 86.7%
associate-*r/88.1%
*-commutative88.1%
Simplified88.1%
if -3.6999999999999999e-103 < a Initial program 80.1%
associate-*l*80.1%
*-rgt-identity80.1%
associate-/l*80.1%
metadata-eval80.1%
associate-*l/80.2%
*-lft-identity80.2%
sub-neg80.2%
distribute-neg-frac80.2%
metadata-eval80.2%
Simplified80.2%
metadata-eval80.2%
div-inv80.2%
associate-*r/80.1%
*-commutative80.1%
difference-of-squares87.7%
associate-/r*99.6%
Applied egg-rr75.6%
Taylor expanded in a around inf 75.6%
distribute-lft-out75.6%
Simplified75.6%
Taylor expanded in a around 0 78.8%
*-commutative78.8%
associate-*l/78.8%
Simplified78.8%
Final simplification81.4%
(FPCore (a b) :precision binary64 (if (<= a -8.4e-103) (/ (/ (* PI 0.5) (+ b a)) (* b (- a b))) (/ (/ (/ (* PI 0.5) a) (+ b a)) (- b a))))
double code(double a, double b) {
double tmp;
if (a <= -8.4e-103) {
tmp = ((((double) M_PI) * 0.5) / (b + a)) / (b * (a - b));
} else {
tmp = (((((double) M_PI) * 0.5) / a) / (b + a)) / (b - a);
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -8.4e-103) {
tmp = ((Math.PI * 0.5) / (b + a)) / (b * (a - b));
} else {
tmp = (((Math.PI * 0.5) / a) / (b + a)) / (b - a);
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -8.4e-103: tmp = ((math.pi * 0.5) / (b + a)) / (b * (a - b)) else: tmp = (((math.pi * 0.5) / a) / (b + a)) / (b - a) return tmp
function code(a, b) tmp = 0.0 if (a <= -8.4e-103) tmp = Float64(Float64(Float64(pi * 0.5) / Float64(b + a)) / Float64(b * Float64(a - b))); else tmp = Float64(Float64(Float64(Float64(pi * 0.5) / a) / Float64(b + a)) / Float64(b - a)); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -8.4e-103) tmp = ((pi * 0.5) / (b + a)) / (b * (a - b)); else tmp = (((pi * 0.5) / a) / (b + a)) / (b - a); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -8.4e-103], N[(N[(N[(Pi * 0.5), $MachinePrecision] / N[(b + a), $MachinePrecision]), $MachinePrecision] / N[(b * N[(a - b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(Pi * 0.5), $MachinePrecision] / a), $MachinePrecision] / N[(b + a), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -8.4 \cdot 10^{-103}:\\
\;\;\;\;\frac{\frac{\pi \cdot 0.5}{b + a}}{b \cdot \left(a - b\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\frac{\pi \cdot 0.5}{a}}{b + a}}{b - a}\\
\end{array}
\end{array}
if a < -8.40000000000000019e-103Initial program 84.5%
un-div-inv84.5%
difference-of-squares94.3%
associate-/r*94.2%
div-inv94.2%
metadata-eval94.2%
Applied egg-rr94.2%
Taylor expanded in a around inf 83.8%
frac-times88.0%
associate-/l*88.0%
Applied egg-rr88.0%
*-commutative88.0%
mul-1-neg88.0%
associate-*r/88.0%
+-commutative88.0%
*-commutative88.0%
Simplified88.0%
if -8.40000000000000019e-103 < a Initial program 80.1%
associate-*l*80.1%
*-rgt-identity80.1%
associate-/l*80.1%
metadata-eval80.1%
associate-*l/80.2%
*-lft-identity80.2%
sub-neg80.2%
distribute-neg-frac80.2%
metadata-eval80.2%
Simplified80.2%
metadata-eval80.2%
div-inv80.2%
associate-*r/80.1%
*-commutative80.1%
difference-of-squares87.7%
associate-/r*99.6%
Applied egg-rr75.6%
Taylor expanded in a around inf 75.6%
distribute-lft-out75.6%
Simplified75.6%
Taylor expanded in a around 0 78.8%
*-commutative78.8%
associate-*l/78.8%
Simplified78.8%
Final simplification81.4%
(FPCore (a b) :precision binary64 (if (<= a -1.4e+94) (* 0.5 (/ (/ PI a) (* b (- b a)))) (* (/ 1.0 b) (* 0.5 (/ (/ PI a) b)))))
double code(double a, double b) {
double tmp;
if (a <= -1.4e+94) {
tmp = 0.5 * ((((double) M_PI) / a) / (b * (b - a)));
} else {
tmp = (1.0 / b) * (0.5 * ((((double) M_PI) / a) / b));
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -1.4e+94) {
tmp = 0.5 * ((Math.PI / a) / (b * (b - a)));
} else {
tmp = (1.0 / b) * (0.5 * ((Math.PI / a) / b));
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -1.4e+94: tmp = 0.5 * ((math.pi / a) / (b * (b - a))) else: tmp = (1.0 / b) * (0.5 * ((math.pi / a) / b)) return tmp
function code(a, b) tmp = 0.0 if (a <= -1.4e+94) tmp = Float64(0.5 * Float64(Float64(pi / a) / Float64(b * Float64(b - a)))); else tmp = Float64(Float64(1.0 / b) * Float64(0.5 * Float64(Float64(pi / a) / b))); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -1.4e+94) tmp = 0.5 * ((pi / a) / (b * (b - a))); else tmp = (1.0 / b) * (0.5 * ((pi / a) / b)); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -1.4e+94], N[(0.5 * N[(N[(Pi / a), $MachinePrecision] / N[(b * N[(b - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 / b), $MachinePrecision] * N[(0.5 * N[(N[(Pi / a), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -1.4 \cdot 10^{+94}:\\
\;\;\;\;0.5 \cdot \frac{\frac{\pi}{a}}{b \cdot \left(b - a\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{b} \cdot \left(0.5 \cdot \frac{\frac{\pi}{a}}{b}\right)\\
\end{array}
\end{array}
if a < -1.39999999999999999e94Initial program 71.9%
associate-*l*71.9%
*-rgt-identity71.9%
associate-/l*71.9%
metadata-eval71.9%
associate-*l/71.9%
*-lft-identity71.9%
sub-neg71.9%
distribute-neg-frac71.9%
metadata-eval71.9%
Simplified71.9%
metadata-eval71.9%
div-inv71.9%
associate-*r/71.9%
*-commutative71.9%
difference-of-squares91.4%
associate-/r*99.8%
Applied egg-rr80.6%
Taylor expanded in a around 0 80.6%
associate-/l*80.6%
associate-/r*80.6%
Applied egg-rr80.6%
associate-/l/80.6%
*-commutative80.6%
Simplified80.6%
if -1.39999999999999999e94 < a Initial program 82.9%
associate-*l*82.9%
*-rgt-identity82.9%
associate-/l*82.9%
metadata-eval82.9%
associate-*l/82.9%
*-lft-identity82.9%
sub-neg82.9%
distribute-neg-frac82.9%
metadata-eval82.9%
Simplified82.9%
metadata-eval82.9%
div-inv82.9%
associate-*r/82.9%
*-commutative82.9%
difference-of-squares89.2%
associate-/r*99.6%
Applied egg-rr71.3%
Taylor expanded in a around 0 71.4%
div-inv71.4%
associate-/r*71.3%
Applied egg-rr71.3%
Taylor expanded in b around inf 66.0%
Final simplification68.1%
(FPCore (a b) :precision binary64 (if (<= a -2.7e+94) (/ 0.5 (* (- b a) (* b (/ a PI)))) (* (/ 1.0 b) (* 0.5 (/ (/ PI a) b)))))
double code(double a, double b) {
double tmp;
if (a <= -2.7e+94) {
tmp = 0.5 / ((b - a) * (b * (a / ((double) M_PI))));
} else {
tmp = (1.0 / b) * (0.5 * ((((double) M_PI) / a) / b));
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -2.7e+94) {
tmp = 0.5 / ((b - a) * (b * (a / Math.PI)));
} else {
tmp = (1.0 / b) * (0.5 * ((Math.PI / a) / b));
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -2.7e+94: tmp = 0.5 / ((b - a) * (b * (a / math.pi))) else: tmp = (1.0 / b) * (0.5 * ((math.pi / a) / b)) return tmp
function code(a, b) tmp = 0.0 if (a <= -2.7e+94) tmp = Float64(0.5 / Float64(Float64(b - a) * Float64(b * Float64(a / pi)))); else tmp = Float64(Float64(1.0 / b) * Float64(0.5 * Float64(Float64(pi / a) / b))); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -2.7e+94) tmp = 0.5 / ((b - a) * (b * (a / pi))); else tmp = (1.0 / b) * (0.5 * ((pi / a) / b)); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -2.7e+94], N[(0.5 / N[(N[(b - a), $MachinePrecision] * N[(b * N[(a / Pi), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 / b), $MachinePrecision] * N[(0.5 * N[(N[(Pi / a), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -2.7 \cdot 10^{+94}:\\
\;\;\;\;\frac{0.5}{\left(b - a\right) \cdot \left(b \cdot \frac{a}{\pi}\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{b} \cdot \left(0.5 \cdot \frac{\frac{\pi}{a}}{b}\right)\\
\end{array}
\end{array}
if a < -2.7000000000000001e94Initial program 71.9%
associate-*l*71.9%
*-rgt-identity71.9%
associate-/l*71.9%
metadata-eval71.9%
associate-*l/71.9%
*-lft-identity71.9%
sub-neg71.9%
distribute-neg-frac71.9%
metadata-eval71.9%
Simplified71.9%
metadata-eval71.9%
div-inv71.9%
associate-*r/71.9%
*-commutative71.9%
difference-of-squares91.4%
associate-/r*99.8%
Applied egg-rr80.6%
Taylor expanded in a around 0 80.6%
associate-/l*80.6%
associate-/r*80.6%
Applied egg-rr80.6%
associate-/l/80.6%
*-commutative80.6%
Simplified80.6%
associate-/r*80.6%
div-inv80.6%
clear-num80.6%
frac-times80.6%
metadata-eval80.6%
*-commutative80.6%
associate-/l*80.6%
div-inv80.6%
un-div-inv80.6%
frac-times80.6%
metadata-eval80.6%
Applied egg-rr80.6%
if -2.7000000000000001e94 < a Initial program 82.9%
associate-*l*82.9%
*-rgt-identity82.9%
associate-/l*82.9%
metadata-eval82.9%
associate-*l/82.9%
*-lft-identity82.9%
sub-neg82.9%
distribute-neg-frac82.9%
metadata-eval82.9%
Simplified82.9%
metadata-eval82.9%
div-inv82.9%
associate-*r/82.9%
*-commutative82.9%
difference-of-squares89.2%
associate-/r*99.6%
Applied egg-rr71.3%
Taylor expanded in a around 0 71.4%
div-inv71.4%
associate-/r*71.3%
Applied egg-rr71.3%
Taylor expanded in b around inf 66.0%
Final simplification68.1%
(FPCore (a b) :precision binary64 (if (<= a -2.65e-110) (/ (* (/ PI a) (/ -0.5 b)) (- b a)) (* (/ 1.0 b) (* 0.5 (/ (/ PI a) b)))))
double code(double a, double b) {
double tmp;
if (a <= -2.65e-110) {
tmp = ((((double) M_PI) / a) * (-0.5 / b)) / (b - a);
} else {
tmp = (1.0 / b) * (0.5 * ((((double) M_PI) / a) / b));
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -2.65e-110) {
tmp = ((Math.PI / a) * (-0.5 / b)) / (b - a);
} else {
tmp = (1.0 / b) * (0.5 * ((Math.PI / a) / b));
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -2.65e-110: tmp = ((math.pi / a) * (-0.5 / b)) / (b - a) else: tmp = (1.0 / b) * (0.5 * ((math.pi / a) / b)) return tmp
function code(a, b) tmp = 0.0 if (a <= -2.65e-110) tmp = Float64(Float64(Float64(pi / a) * Float64(-0.5 / b)) / Float64(b - a)); else tmp = Float64(Float64(1.0 / b) * Float64(0.5 * Float64(Float64(pi / a) / b))); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -2.65e-110) tmp = ((pi / a) * (-0.5 / b)) / (b - a); else tmp = (1.0 / b) * (0.5 * ((pi / a) / b)); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -2.65e-110], N[(N[(N[(Pi / a), $MachinePrecision] * N[(-0.5 / b), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 / b), $MachinePrecision] * N[(0.5 * N[(N[(Pi / a), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -2.65 \cdot 10^{-110}:\\
\;\;\;\;\frac{\frac{\pi}{a} \cdot \frac{-0.5}{b}}{b - a}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{b} \cdot \left(0.5 \cdot \frac{\frac{\pi}{a}}{b}\right)\\
\end{array}
\end{array}
if a < -2.65e-110Initial program 84.3%
un-div-inv84.3%
difference-of-squares93.4%
associate-/r*94.4%
div-inv94.4%
metadata-eval94.4%
Applied egg-rr94.4%
associate-*l/99.7%
Applied egg-rr99.7%
associate-*l/99.6%
Applied egg-rr99.6%
Taylor expanded in a around inf 84.7%
associate-*r/84.7%
*-commutative84.7%
times-frac84.7%
Simplified84.7%
if -2.65e-110 < a Initial program 80.1%
associate-*l*80.1%
*-rgt-identity80.1%
associate-/l*80.1%
metadata-eval80.1%
associate-*l/80.1%
*-lft-identity80.1%
sub-neg80.1%
distribute-neg-frac80.1%
metadata-eval80.1%
Simplified80.1%
metadata-eval80.1%
div-inv80.1%
associate-*r/80.1%
*-commutative80.1%
difference-of-squares87.9%
associate-/r*99.6%
Applied egg-rr75.4%
Taylor expanded in a around 0 75.5%
div-inv75.5%
associate-/r*75.4%
Applied egg-rr75.4%
Taylor expanded in b around inf 68.8%
Final simplification73.6%
(FPCore (a b) :precision binary64 (if (<= a -2.65e-110) (/ (/ (* PI -0.5) (* b a)) (- b a)) (* (/ 1.0 b) (* 0.5 (/ (/ PI a) b)))))
double code(double a, double b) {
double tmp;
if (a <= -2.65e-110) {
tmp = ((((double) M_PI) * -0.5) / (b * a)) / (b - a);
} else {
tmp = (1.0 / b) * (0.5 * ((((double) M_PI) / a) / b));
}
return tmp;
}
public static double code(double a, double b) {
double tmp;
if (a <= -2.65e-110) {
tmp = ((Math.PI * -0.5) / (b * a)) / (b - a);
} else {
tmp = (1.0 / b) * (0.5 * ((Math.PI / a) / b));
}
return tmp;
}
def code(a, b): tmp = 0 if a <= -2.65e-110: tmp = ((math.pi * -0.5) / (b * a)) / (b - a) else: tmp = (1.0 / b) * (0.5 * ((math.pi / a) / b)) return tmp
function code(a, b) tmp = 0.0 if (a <= -2.65e-110) tmp = Float64(Float64(Float64(pi * -0.5) / Float64(b * a)) / Float64(b - a)); else tmp = Float64(Float64(1.0 / b) * Float64(0.5 * Float64(Float64(pi / a) / b))); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if (a <= -2.65e-110) tmp = ((pi * -0.5) / (b * a)) / (b - a); else tmp = (1.0 / b) * (0.5 * ((pi / a) / b)); end tmp_2 = tmp; end
code[a_, b_] := If[LessEqual[a, -2.65e-110], N[(N[(N[(Pi * -0.5), $MachinePrecision] / N[(b * a), $MachinePrecision]), $MachinePrecision] / N[(b - a), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 / b), $MachinePrecision] * N[(0.5 * N[(N[(Pi / a), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -2.65 \cdot 10^{-110}:\\
\;\;\;\;\frac{\frac{\pi \cdot -0.5}{b \cdot a}}{b - a}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{b} \cdot \left(0.5 \cdot \frac{\frac{\pi}{a}}{b}\right)\\
\end{array}
\end{array}
if a < -2.65e-110Initial program 84.3%
un-div-inv84.3%
difference-of-squares93.4%
associate-/r*94.4%
div-inv94.4%
metadata-eval94.4%
Applied egg-rr94.4%
associate-*l/99.7%
Applied egg-rr99.7%
Taylor expanded in b around 0 84.7%
associate-*r/84.7%
Simplified84.7%
if -2.65e-110 < a Initial program 80.1%
associate-*l*80.1%
*-rgt-identity80.1%
associate-/l*80.1%
metadata-eval80.1%
associate-*l/80.1%
*-lft-identity80.1%
sub-neg80.1%
distribute-neg-frac80.1%
metadata-eval80.1%
Simplified80.1%
metadata-eval80.1%
div-inv80.1%
associate-*r/80.1%
*-commutative80.1%
difference-of-squares87.9%
associate-/r*99.6%
Applied egg-rr75.4%
Taylor expanded in a around 0 75.5%
div-inv75.5%
associate-/r*75.4%
Applied egg-rr75.4%
Taylor expanded in b around inf 68.8%
Final simplification73.6%
(FPCore (a b) :precision binary64 (* 0.5 (/ (/ PI a) (* b (- b a)))))
double code(double a, double b) {
return 0.5 * ((((double) M_PI) / a) / (b * (b - a)));
}
public static double code(double a, double b) {
return 0.5 * ((Math.PI / a) / (b * (b - a)));
}
def code(a, b): return 0.5 * ((math.pi / a) / (b * (b - a)))
function code(a, b) return Float64(0.5 * Float64(Float64(pi / a) / Float64(b * Float64(b - a)))) end
function tmp = code(a, b) tmp = 0.5 * ((pi / a) / (b * (b - a))); end
code[a_, b_] := N[(0.5 * N[(N[(Pi / a), $MachinePrecision] / N[(b * N[(b - a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot \frac{\frac{\pi}{a}}{b \cdot \left(b - a\right)}
\end{array}
Initial program 81.4%
associate-*l*81.3%
*-rgt-identity81.3%
associate-/l*81.3%
metadata-eval81.3%
associate-*l/81.4%
*-lft-identity81.4%
sub-neg81.4%
distribute-neg-frac81.4%
metadata-eval81.4%
Simplified81.4%
metadata-eval81.4%
div-inv81.4%
associate-*r/81.3%
*-commutative81.3%
difference-of-squares89.5%
associate-/r*99.6%
Applied egg-rr72.6%
Taylor expanded in a around 0 72.7%
associate-/l*72.7%
associate-/r*72.7%
Applied egg-rr72.7%
associate-/l/67.1%
*-commutative67.1%
Simplified67.1%
Final simplification67.1%
herbie shell --seed 2024076
(FPCore (a b)
:name "NMSE Section 6.1 mentioned, B"
:precision binary64
(* (* (/ PI 2.0) (/ 1.0 (- (* b b) (* a a)))) (- (/ 1.0 a) (/ 1.0 b))))