| Alternative 1 | |
|---|---|
| Error | 2.3 |
| Cost | 81348 |
(FPCore (z)
:precision binary64
(*
(*
(* (sqrt (* PI 2.0)) (pow (+ (+ (- z 1.0) 7.0) 0.5) (+ (- z 1.0) 0.5)))
(exp (- (+ (+ (- z 1.0) 7.0) 0.5))))
(+
(+
(+
(+
(+
(+
(+
(+ 0.9999999999998099 (/ 676.5203681218851 (+ (- z 1.0) 1.0)))
(/ -1259.1392167224028 (+ (- z 1.0) 2.0)))
(/ 771.3234287776531 (+ (- z 1.0) 3.0)))
(/ -176.6150291621406 (+ (- z 1.0) 4.0)))
(/ 12.507343278686905 (+ (- z 1.0) 5.0)))
(/ -0.13857109526572012 (+ (- z 1.0) 6.0)))
(/ 9.984369578019572e-6 (+ (- z 1.0) 7.0)))
(/ 1.5056327351493116e-7 (+ (- z 1.0) 8.0)))))(FPCore (z)
:precision binary64
(let* ((t_0 (/ 771.3234287776531 (+ z 2.0)))
(t_1 (/ -1259.1392167224028 (+ z 1.0)))
(t_2 (sqrt (* PI 2.0)))
(t_3 (cbrt t_2))
(t_4 (/ 12.507343278686905 (+ z 4.0)))
(t_5 (/ -176.6150291621406 (+ z 3.0)))
(t_6 (/ -0.13857109526572012 (+ z 5.0)))
(t_7
(+
(/ 9.984369578019572e-6 (+ z 6.0))
(/ 1.5056327351493116e-7 (+ z 7.0))))
(t_8
(+
0.9999999999998099
(+
(/ 676.5203681218851 z)
(+ t_1 (+ (+ t_5 (+ t_0 t_4)) (+ t_6 t_7)))))))
(if (<= (+ z -1.0) 142.0)
(*
(*
(* t_2 (pow (+ (+ z -1.0) 7.5) (+ z -0.5)))
(* (exp (- -6.0 z)) (exp -0.5)))
(+
(+
(+ t_4 t_6)
(+ 0.9999999999998099 (+ (+ (/ 676.5203681218851 z) t_1) (+ t_5 t_0))))
t_7))
(*
(* t_3 (* t_3 t_3))
(*
(cbrt (* t_8 (* t_8 t_8)))
(exp (fma (- (log (+ z 6.5))) (- 0.5 z) (- -6.5 z))))))))double code(double z) {
return ((sqrt((((double) M_PI) * 2.0)) * pow((((z - 1.0) + 7.0) + 0.5), ((z - 1.0) + 0.5))) * exp(-(((z - 1.0) + 7.0) + 0.5))) * ((((((((0.9999999999998099 + (676.5203681218851 / ((z - 1.0) + 1.0))) + (-1259.1392167224028 / ((z - 1.0) + 2.0))) + (771.3234287776531 / ((z - 1.0) + 3.0))) + (-176.6150291621406 / ((z - 1.0) + 4.0))) + (12.507343278686905 / ((z - 1.0) + 5.0))) + (-0.13857109526572012 / ((z - 1.0) + 6.0))) + (9.984369578019572e-6 / ((z - 1.0) + 7.0))) + (1.5056327351493116e-7 / ((z - 1.0) + 8.0)));
}
double code(double z) {
double t_0 = 771.3234287776531 / (z + 2.0);
double t_1 = -1259.1392167224028 / (z + 1.0);
double t_2 = sqrt((((double) M_PI) * 2.0));
double t_3 = cbrt(t_2);
double t_4 = 12.507343278686905 / (z + 4.0);
double t_5 = -176.6150291621406 / (z + 3.0);
double t_6 = -0.13857109526572012 / (z + 5.0);
double t_7 = (9.984369578019572e-6 / (z + 6.0)) + (1.5056327351493116e-7 / (z + 7.0));
double t_8 = 0.9999999999998099 + ((676.5203681218851 / z) + (t_1 + ((t_5 + (t_0 + t_4)) + (t_6 + t_7))));
double tmp;
if ((z + -1.0) <= 142.0) {
tmp = ((t_2 * pow(((z + -1.0) + 7.5), (z + -0.5))) * (exp((-6.0 - z)) * exp(-0.5))) * (((t_4 + t_6) + (0.9999999999998099 + (((676.5203681218851 / z) + t_1) + (t_5 + t_0)))) + t_7);
} else {
tmp = (t_3 * (t_3 * t_3)) * (cbrt((t_8 * (t_8 * t_8))) * exp(fma(-log((z + 6.5)), (0.5 - z), (-6.5 - z))));
}
return tmp;
}
function code(z) return Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (Float64(Float64(Float64(z - 1.0) + 7.0) + 0.5) ^ Float64(Float64(z - 1.0) + 0.5))) * exp(Float64(-Float64(Float64(Float64(z - 1.0) + 7.0) + 0.5)))) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(0.9999999999998099 + Float64(676.5203681218851 / Float64(Float64(z - 1.0) + 1.0))) + Float64(-1259.1392167224028 / Float64(Float64(z - 1.0) + 2.0))) + Float64(771.3234287776531 / Float64(Float64(z - 1.0) + 3.0))) + Float64(-176.6150291621406 / Float64(Float64(z - 1.0) + 4.0))) + Float64(12.507343278686905 / Float64(Float64(z - 1.0) + 5.0))) + Float64(-0.13857109526572012 / Float64(Float64(z - 1.0) + 6.0))) + Float64(9.984369578019572e-6 / Float64(Float64(z - 1.0) + 7.0))) + Float64(1.5056327351493116e-7 / Float64(Float64(z - 1.0) + 8.0)))) end
function code(z) t_0 = Float64(771.3234287776531 / Float64(z + 2.0)) t_1 = Float64(-1259.1392167224028 / Float64(z + 1.0)) t_2 = sqrt(Float64(pi * 2.0)) t_3 = cbrt(t_2) t_4 = Float64(12.507343278686905 / Float64(z + 4.0)) t_5 = Float64(-176.6150291621406 / Float64(z + 3.0)) t_6 = Float64(-0.13857109526572012 / Float64(z + 5.0)) t_7 = Float64(Float64(9.984369578019572e-6 / Float64(z + 6.0)) + Float64(1.5056327351493116e-7 / Float64(z + 7.0))) t_8 = Float64(0.9999999999998099 + Float64(Float64(676.5203681218851 / z) + Float64(t_1 + Float64(Float64(t_5 + Float64(t_0 + t_4)) + Float64(t_6 + t_7))))) tmp = 0.0 if (Float64(z + -1.0) <= 142.0) tmp = Float64(Float64(Float64(t_2 * (Float64(Float64(z + -1.0) + 7.5) ^ Float64(z + -0.5))) * Float64(exp(Float64(-6.0 - z)) * exp(-0.5))) * Float64(Float64(Float64(t_4 + t_6) + Float64(0.9999999999998099 + Float64(Float64(Float64(676.5203681218851 / z) + t_1) + Float64(t_5 + t_0)))) + t_7)); else tmp = Float64(Float64(t_3 * Float64(t_3 * t_3)) * Float64(cbrt(Float64(t_8 * Float64(t_8 * t_8))) * exp(fma(Float64(-log(Float64(z + 6.5))), Float64(0.5 - z), Float64(-6.5 - z))))); end return tmp end
code[z_] := N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[N[(N[(N[(z - 1.0), $MachinePrecision] + 7.0), $MachinePrecision] + 0.5), $MachinePrecision], N[(N[(z - 1.0), $MachinePrecision] + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Exp[(-N[(N[(N[(z - 1.0), $MachinePrecision] + 7.0), $MachinePrecision] + 0.5), $MachinePrecision])], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(0.9999999999998099 + N[(676.5203681218851 / N[(N[(z - 1.0), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-1259.1392167224028 / N[(N[(z - 1.0), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(771.3234287776531 / N[(N[(z - 1.0), $MachinePrecision] + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-176.6150291621406 / N[(N[(z - 1.0), $MachinePrecision] + 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(12.507343278686905 / N[(N[(z - 1.0), $MachinePrecision] + 5.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-0.13857109526572012 / N[(N[(z - 1.0), $MachinePrecision] + 6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(9.984369578019572e-6 / N[(N[(z - 1.0), $MachinePrecision] + 7.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(N[(z - 1.0), $MachinePrecision] + 8.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[z_] := Block[{t$95$0 = N[(771.3234287776531 / N[(z + 2.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(-1259.1392167224028 / N[(z + 1.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$3 = N[Power[t$95$2, 1/3], $MachinePrecision]}, Block[{t$95$4 = N[(12.507343278686905 / N[(z + 4.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[(-176.6150291621406 / N[(z + 3.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$6 = N[(-0.13857109526572012 / N[(z + 5.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$7 = N[(N[(9.984369578019572e-6 / N[(z + 6.0), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(z + 7.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$8 = N[(0.9999999999998099 + N[(N[(676.5203681218851 / z), $MachinePrecision] + N[(t$95$1 + N[(N[(t$95$5 + N[(t$95$0 + t$95$4), $MachinePrecision]), $MachinePrecision] + N[(t$95$6 + t$95$7), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(z + -1.0), $MachinePrecision], 142.0], N[(N[(N[(t$95$2 * N[Power[N[(N[(z + -1.0), $MachinePrecision] + 7.5), $MachinePrecision], N[(z + -0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[(N[Exp[N[(-6.0 - z), $MachinePrecision]], $MachinePrecision] * N[Exp[-0.5], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(N[(t$95$4 + t$95$6), $MachinePrecision] + N[(0.9999999999998099 + N[(N[(N[(676.5203681218851 / z), $MachinePrecision] + t$95$1), $MachinePrecision] + N[(t$95$5 + t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$7), $MachinePrecision]), $MachinePrecision], N[(N[(t$95$3 * N[(t$95$3 * t$95$3), $MachinePrecision]), $MachinePrecision] * N[(N[Power[N[(t$95$8 * N[(t$95$8 * t$95$8), $MachinePrecision]), $MachinePrecision], 1/3], $MachinePrecision] * N[Exp[N[((-N[Log[N[(z + 6.5), $MachinePrecision]], $MachinePrecision]) * N[(0.5 - z), $MachinePrecision] + N[(-6.5 - z), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]]]]
\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(z - 1\right) + 8}\right)
\begin{array}{l}
t_0 := \frac{771.3234287776531}{z + 2}\\
t_1 := \frac{-1259.1392167224028}{z + 1}\\
t_2 := \sqrt{\pi \cdot 2}\\
t_3 := \sqrt[3]{t_2}\\
t_4 := \frac{12.507343278686905}{z + 4}\\
t_5 := \frac{-176.6150291621406}{z + 3}\\
t_6 := \frac{-0.13857109526572012}{z + 5}\\
t_7 := \frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\\
t_8 := 0.9999999999998099 + \left(\frac{676.5203681218851}{z} + \left(t_1 + \left(\left(t_5 + \left(t_0 + t_4\right)\right) + \left(t_6 + t_7\right)\right)\right)\right)\\
\mathbf{if}\;z + -1 \leq 142:\\
\;\;\;\;\left(\left(t_2 \cdot {\left(\left(z + -1\right) + 7.5\right)}^{\left(z + -0.5\right)}\right) \cdot \left(e^{-6 - z} \cdot e^{-0.5}\right)\right) \cdot \left(\left(\left(t_4 + t_6\right) + \left(0.9999999999998099 + \left(\left(\frac{676.5203681218851}{z} + t_1\right) + \left(t_5 + t_0\right)\right)\right)\right) + t_7\right)\\
\mathbf{else}:\\
\;\;\;\;\left(t_3 \cdot \left(t_3 \cdot t_3\right)\right) \cdot \left(\sqrt[3]{t_8 \cdot \left(t_8 \cdot t_8\right)} \cdot e^{\mathsf{fma}\left(-\log \left(z + 6.5\right), 0.5 - z, -6.5 - z\right)}\right)\\
\end{array}
if (-.f64 z 1) < 142Initial program 2.3
Simplified2.3
[Start]2.3 | \[ \left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(z - 1\right) + 8}\right)
\] |
|---|
Applied egg-rr2.3
Applied egg-rr2.2
Simplified2.2
[Start]2.2 | \[ \left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(z + -1\right) + 7.5\right)}^{\left(z - 0.5\right)}\right) \cdot \left(e^{-\left(z + 6\right)} \cdot e^{-0.5}\right)\right) \cdot \left(\left(1 \cdot \left(\left(0.9999999999998099 + \left(\frac{676.5203681218851}{z} + \frac{-1259.1392167224028}{z + 1}\right)\right) + \left(\frac{771.3234287776531}{z + 2} + \frac{-176.6150291621406}{z + 3}\right)\right) + \left(\frac{12.507343278686905}{z - -4} + \frac{-0.13857109526572012}{z - -5}\right)\right) + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z - -6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z - -7}\right)\right)
\] |
|---|---|
*-lft-identity [=>]2.2 | \[ \left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(z + -1\right) + 7.5\right)}^{\left(z - 0.5\right)}\right) \cdot \left(e^{-\left(z + 6\right)} \cdot e^{-0.5}\right)\right) \cdot \left(\left(\color{blue}{\left(\left(0.9999999999998099 + \left(\frac{676.5203681218851}{z} + \frac{-1259.1392167224028}{z + 1}\right)\right) + \left(\frac{771.3234287776531}{z + 2} + \frac{-176.6150291621406}{z + 3}\right)\right)} + \left(\frac{12.507343278686905}{z - -4} + \frac{-0.13857109526572012}{z - -5}\right)\right) + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z - -6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z - -7}\right)\right)
\] |
associate-+l+ [=>]2.2 | \[ \left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(z + -1\right) + 7.5\right)}^{\left(z - 0.5\right)}\right) \cdot \left(e^{-\left(z + 6\right)} \cdot e^{-0.5}\right)\right) \cdot \left(\left(\color{blue}{\left(0.9999999999998099 + \left(\left(\frac{676.5203681218851}{z} + \frac{-1259.1392167224028}{z + 1}\right) + \left(\frac{771.3234287776531}{z + 2} + \frac{-176.6150291621406}{z + 3}\right)\right)\right)} + \left(\frac{12.507343278686905}{z - -4} + \frac{-0.13857109526572012}{z - -5}\right)\right) + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z - -6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z - -7}\right)\right)
\] |
*-lft-identity [<=]2.2 | \[ \left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(z + -1\right) + 7.5\right)}^{\left(z - 0.5\right)}\right) \cdot \left(e^{-\left(z + 6\right)} \cdot e^{-0.5}\right)\right) \cdot \left(\left(\left(0.9999999999998099 + \left(\color{blue}{1 \cdot \left(\frac{676.5203681218851}{z} + \frac{-1259.1392167224028}{z + 1}\right)} + \left(\frac{771.3234287776531}{z + 2} + \frac{-176.6150291621406}{z + 3}\right)\right)\right) + \left(\frac{12.507343278686905}{z - -4} + \frac{-0.13857109526572012}{z - -5}\right)\right) + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z - -6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z - -7}\right)\right)
\] |
*-lft-identity [=>]2.2 | \[ \left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(z + -1\right) + 7.5\right)}^{\left(z - 0.5\right)}\right) \cdot \left(e^{-\left(z + 6\right)} \cdot e^{-0.5}\right)\right) \cdot \left(\left(\left(0.9999999999998099 + \left(\color{blue}{\left(\frac{676.5203681218851}{z} + \frac{-1259.1392167224028}{z + 1}\right)} + \left(\frac{771.3234287776531}{z + 2} + \frac{-176.6150291621406}{z + 3}\right)\right)\right) + \left(\frac{12.507343278686905}{z - -4} + \frac{-0.13857109526572012}{z - -5}\right)\right) + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z - -6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z - -7}\right)\right)
\] |
+-commutative [=>]2.2 | \[ \left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(z + -1\right) + 7.5\right)}^{\left(z - 0.5\right)}\right) \cdot \left(e^{-\left(z + 6\right)} \cdot e^{-0.5}\right)\right) \cdot \left(\left(\left(0.9999999999998099 + \left(\left(\frac{676.5203681218851}{z} + \frac{-1259.1392167224028}{z + 1}\right) + \left(\frac{771.3234287776531}{\color{blue}{2 + z}} + \frac{-176.6150291621406}{z + 3}\right)\right)\right) + \left(\frac{12.507343278686905}{z - -4} + \frac{-0.13857109526572012}{z - -5}\right)\right) + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z - -6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z - -7}\right)\right)
\] |
if 142 < (-.f64 z 1) Initial program 64.0
Simplified64.0
[Start]64.0 | \[ \left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(z - 1\right) + 8}\right)
\] |
|---|---|
associate-*l* [=>]64.0 | \[ \color{blue}{\left(\sqrt{\pi \cdot 2} \cdot \left({\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)} \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right)\right)} \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(z - 1\right) + 8}\right)
\] |
associate-*l* [=>]64.0 | \[ \color{blue}{\sqrt{\pi \cdot 2} \cdot \left(\left({\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)} \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(z - 1\right) + 8}\right)\right)}
\] |
Taylor expanded in z around -inf 64.0
Simplified7.4
[Start]64.0 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot \frac{e^{-1 \cdot \left(\log \left(6.5 - -1 \cdot z\right) \cdot \left(-1 \cdot z + 0.5\right)\right)}}{e^{6.5 - -1 \cdot z}}\right)
\] |
|---|---|
div-exp [=>]7.8 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot \color{blue}{e^{-1 \cdot \left(\log \left(6.5 - -1 \cdot z\right) \cdot \left(-1 \cdot z + 0.5\right)\right) - \left(6.5 - -1 \cdot z\right)}}\right)
\] |
associate-*r* [=>]7.8 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\color{blue}{\left(-1 \cdot \log \left(6.5 - -1 \cdot z\right)\right) \cdot \left(-1 \cdot z + 0.5\right)} - \left(6.5 - -1 \cdot z\right)}\right)
\] |
fma-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\color{blue}{\mathsf{fma}\left(-1 \cdot \log \left(6.5 - -1 \cdot z\right), -1 \cdot z + 0.5, -\left(6.5 - -1 \cdot z\right)\right)}}\right)
\] |
mul-1-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(\color{blue}{-\log \left(6.5 - -1 \cdot z\right)}, -1 \cdot z + 0.5, -\left(6.5 - -1 \cdot z\right)\right)}\right)
\] |
sub-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \color{blue}{\left(6.5 + \left(--1 \cdot z\right)\right)}, -1 \cdot z + 0.5, -\left(6.5 - -1 \cdot z\right)\right)}\right)
\] |
mul-1-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + \left(-\color{blue}{\left(-z\right)}\right)\right), -1 \cdot z + 0.5, -\left(6.5 - -1 \cdot z\right)\right)}\right)
\] |
remove-double-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + \color{blue}{z}\right), -1 \cdot z + 0.5, -\left(6.5 - -1 \cdot z\right)\right)}\right)
\] |
+-commutative [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), \color{blue}{0.5 + -1 \cdot z}, -\left(6.5 - -1 \cdot z\right)\right)}\right)
\] |
mul-1-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 + \color{blue}{\left(-z\right)}, -\left(6.5 - -1 \cdot z\right)\right)}\right)
\] |
unsub-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), \color{blue}{0.5 - z}, -\left(6.5 - -1 \cdot z\right)\right)}\right)
\] |
sub-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, -\color{blue}{\left(6.5 + \left(--1 \cdot z\right)\right)}\right)}\right)
\] |
+-commutative [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, -\color{blue}{\left(\left(--1 \cdot z\right) + 6.5\right)}\right)}\right)
\] |
mul-1-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, -\left(\left(-\color{blue}{\left(-z\right)}\right) + 6.5\right)\right)}\right)
\] |
remove-double-neg [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, -\left(\color{blue}{z} + 6.5\right)\right)}\right)
\] |
neg-sub0 [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, \color{blue}{0 - \left(z + 6.5\right)}\right)}\right)
\] |
+-commutative [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, 0 - \color{blue}{\left(6.5 + z\right)}\right)}\right)
\] |
associate--r+ [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, \color{blue}{\left(0 - 6.5\right) - z}\right)}\right)
\] |
metadata-eval [=>]7.4 | \[ \sqrt{\pi \cdot 2} \cdot \left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{z}\right) + \left(\left(\frac{-1259.1392167224028}{z + 1} + \left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{2 + z} + \frac{12.507343278686905}{z + 4}\right)\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right) \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, \color{blue}{-6.5} - z\right)}\right)
\] |
Applied egg-rr7.3
Simplified7.3
[Start]7.3 | \[ \sqrt{\pi \cdot 2} \cdot \left(\sqrt[3]{\left(\left(0.9999999999998099 + \left(\frac{676.5203681218851}{z} + \left(\frac{-1259.1392167224028}{z + 1} + \left(\left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{z + 2} + \frac{12.507343278686905}{z + 4}\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right)\right)\right) \cdot \left(0.9999999999998099 + \left(\frac{676.5203681218851}{z} + \left(\frac{-1259.1392167224028}{z + 1} + \left(\left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{z + 2} + \frac{12.507343278686905}{z + 4}\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right)\right)\right)\right) \cdot \left(0.9999999999998099 + \left(\frac{676.5203681218851}{z} + \left(\frac{-1259.1392167224028}{z + 1} + \left(\left(\frac{-176.6150291621406}{z + 3} + \left(\frac{771.3234287776531}{z + 2} + \frac{12.507343278686905}{z + 4}\right)\right) + \left(\frac{-0.13857109526572012}{z + 5} + \left(\frac{9.984369578019572 \cdot 10^{-6}}{z + 6} + \frac{1.5056327351493116 \cdot 10^{-7}}{z + 7}\right)\right)\right)\right)\right)\right)} \cdot e^{\mathsf{fma}\left(-\log \left(6.5 + z\right), 0.5 - z, -6.5 - z\right)}\right)
\] |
|---|
Applied egg-rr7.3
Final simplification2.3
| Alternative 1 | |
|---|---|
| Error | 2.3 |
| Cost | 81348 |
| Alternative 2 | |
|---|---|
| Error | 2.3 |
| Cost | 61124 |
| Alternative 3 | |
|---|---|
| Error | 2.4 |
| Cost | 36420 |
| Alternative 4 | |
|---|---|
| Error | 2.3 |
| Cost | 29700 |
| Alternative 5 | |
|---|---|
| Error | 2.3 |
| Cost | 29700 |
| Alternative 6 | |
|---|---|
| Error | 2.3 |
| Cost | 29700 |
| Alternative 7 | |
|---|---|
| Error | 3.9 |
| Cost | 29504 |
| Alternative 8 | |
|---|---|
| Error | 3.9 |
| Cost | 29504 |
| Alternative 9 | |
|---|---|
| Error | 46.8 |
| Cost | 28992 |
| Alternative 10 | |
|---|---|
| Error | 46.8 |
| Cost | 28736 |
| Alternative 11 | |
|---|---|
| Error | 46.9 |
| Cost | 27264 |
| Alternative 12 | |
|---|---|
| Error | 47.6 |
| Cost | 27200 |
| Alternative 13 | |
|---|---|
| Error | 47.6 |
| Cost | 27200 |
| Alternative 14 | |
|---|---|
| Error | 47.6 |
| Cost | 27200 |
| Alternative 15 | |
|---|---|
| Error | 50.3 |
| Cost | 26948 |
| Alternative 16 | |
|---|---|
| Error | 51.6 |
| Cost | 26756 |
| Alternative 17 | |
|---|---|
| Error | 52.0 |
| Cost | 26692 |
| Alternative 18 | |
|---|---|
| Error | 55.7 |
| Cost | 19584 |
herbie shell --seed 2023025
(FPCore (z)
:name "Jmat.Real.gamma, branch z greater than 0.5"
:precision binary64
:pre (> z 0.5)
(* (* (* (sqrt (* PI 2.0)) (pow (+ (+ (- z 1.0) 7.0) 0.5) (+ (- z 1.0) 0.5))) (exp (- (+ (+ (- z 1.0) 7.0) 0.5)))) (+ (+ (+ (+ (+ (+ (+ (+ 0.9999999999998099 (/ 676.5203681218851 (+ (- z 1.0) 1.0))) (/ -1259.1392167224028 (+ (- z 1.0) 2.0))) (/ 771.3234287776531 (+ (- z 1.0) 3.0))) (/ -176.6150291621406 (+ (- z 1.0) 4.0))) (/ 12.507343278686905 (+ (- z 1.0) 5.0))) (/ -0.13857109526572012 (+ (- z 1.0) 6.0))) (/ 9.984369578019572e-6 (+ (- z 1.0) 7.0))) (/ 1.5056327351493116e-7 (+ (- z 1.0) 8.0)))))