Jmat.Real.gamma, branch z less than 0.5

Percentage Accurate: 96.5% → 98.5%

Time: 9.6s

Alternatives: 13

Speedup: 2.1×

• could not determine a ground truth

  1. z = -1251898318917229.3

Specification

\[z \leq 0.5\]

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ t_1 := t\_0 + 7\\ t_2 := t\_1 + 0.5\\ \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {t\_2}^{\left(t\_0 + 0.5\right)}\right) \cdot e^{-t\_2}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{t\_0 + 1}\right) + \frac{-1259.1392167224028}{t\_0 + 2}\right) + \frac{771.3234287776531}{t\_0 + 3}\right) + \frac{-176.6150291621406}{t\_0 + 4}\right) + \frac{12.507343278686905}{t\_0 + 5}\right) + \frac{-0.13857109526572012}{t\_0 + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{t\_1}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{t\_0 + 8}\right)\right) \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0)) (t_1 (+ t_0 7.0)) (t_2 (+ t_1 0.5)))
   (*
    (/ PI (sin (* PI z)))
    (*
     (* (* (sqrt (* PI 2.0)) (pow t_2 (+ t_0 0.5))) (exp (- t_2)))
     (+
      (+
       (+
        (+
         (+
          (+
           (+
            (+ 0.9999999999998099 (/ 676.5203681218851 (+ t_0 1.0)))
            (/ -1259.1392167224028 (+ t_0 2.0)))
           (/ 771.3234287776531 (+ t_0 3.0)))
          (/ -176.6150291621406 (+ t_0 4.0)))
         (/ 12.507343278686905 (+ t_0 5.0)))
        (/ -0.13857109526572012 (+ t_0 6.0)))
       (/ 9.984369578019572e-6 t_1))
      (/ 1.5056327351493116e-7 (+ t_0 8.0)))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 7.0;
	double t_2 = t_1 + 0.5;
	return (((double) M_PI) / sin((((double) M_PI) * z))) * (((sqrt((((double) M_PI) * 2.0)) * pow(t_2, (t_0 + 0.5))) * exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_1)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 7.0;
	double t_2 = t_1 + 0.5;
	return (Math.PI / Math.sin((Math.PI * z))) * (((Math.sqrt((Math.PI * 2.0)) * Math.pow(t_2, (t_0 + 0.5))) * Math.exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_1)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	t_1 = t_0 + 7.0
	t_2 = t_1 + 0.5
	return (math.pi / math.sin((math.pi * z))) * (((math.sqrt((math.pi * 2.0)) * math.pow(t_2, (t_0 + 0.5))) * math.exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_1)) + (1.5056327351493116e-7 / (t_0 + 8.0))))

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	t_1 = Float64(t_0 + 7.0)
	t_2 = Float64(t_1 + 0.5)
	return Float64(Float64(pi / sin(Float64(pi * z))) * Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (t_2 ^ Float64(t_0 + 0.5))) * exp(Float64(-t_2))) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(0.9999999999998099 + Float64(676.5203681218851 / Float64(t_0 + 1.0))) + Float64(-1259.1392167224028 / Float64(t_0 + 2.0))) + Float64(771.3234287776531 / Float64(t_0 + 3.0))) + Float64(-176.6150291621406 / Float64(t_0 + 4.0))) + Float64(12.507343278686905 / Float64(t_0 + 5.0))) + Float64(-0.13857109526572012 / Float64(t_0 + 6.0))) + Float64(9.984369578019572e-6 / t_1)) + Float64(1.5056327351493116e-7 / Float64(t_0 + 8.0)))))
end

MATLAB

function tmp = code(z)
	t_0 = (1.0 - z) - 1.0;
	t_1 = t_0 + 7.0;
	t_2 = t_1 + 0.5;
	tmp = (pi / sin((pi * z))) * (((sqrt((pi * 2.0)) * (t_2 ^ (t_0 + 0.5))) * exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_1)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 + 7.0), $MachinePrecision]}, Block[{t$95$2 = N[(t$95$1 + 0.5), $MachinePrecision]}, N[(N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[t$95$2, N[(t$95$0 + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Exp[(-t$95$2)], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(0.9999999999998099 + N[(676.5203681218851 / N[(t$95$0 + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-1259.1392167224028 / N[(t$95$0 + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(771.3234287776531 / N[(t$95$0 + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-176.6150291621406 / N[(t$95$0 + 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(12.507343278686905 / N[(t$95$0 + 5.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-0.13857109526572012 / N[(t$95$0 + 6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(9.984369578019572e-6 / t$95$1), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(t$95$0 + 8.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]

Initial Program: 96.5% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ t_1 := t\_0 + 7\\ t_2 := t\_1 + 0.5\\ \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {t\_2}^{\left(t\_0 + 0.5\right)}\right) \cdot e^{-t\_2}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{t\_0 + 1}\right) + \frac{-1259.1392167224028}{t\_0 + 2}\right) + \frac{771.3234287776531}{t\_0 + 3}\right) + \frac{-176.6150291621406}{t\_0 + 4}\right) + \frac{12.507343278686905}{t\_0 + 5}\right) + \frac{-0.13857109526572012}{t\_0 + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{t\_1}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{t\_0 + 8}\right)\right) \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0)) (t_1 (+ t_0 7.0)) (t_2 (+ t_1 0.5)))
   (*
    (/ PI (sin (* PI z)))
    (*
     (* (* (sqrt (* PI 2.0)) (pow t_2 (+ t_0 0.5))) (exp (- t_2)))
     (+
      (+
       (+
        (+
         (+
          (+
           (+
            (+ 0.9999999999998099 (/ 676.5203681218851 (+ t_0 1.0)))
            (/ -1259.1392167224028 (+ t_0 2.0)))
           (/ 771.3234287776531 (+ t_0 3.0)))
          (/ -176.6150291621406 (+ t_0 4.0)))
         (/ 12.507343278686905 (+ t_0 5.0)))
        (/ -0.13857109526572012 (+ t_0 6.0)))
       (/ 9.984369578019572e-6 t_1))
      (/ 1.5056327351493116e-7 (+ t_0 8.0)))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 7.0;
	double t_2 = t_1 + 0.5;
	return (((double) M_PI) / sin((((double) M_PI) * z))) * (((sqrt((((double) M_PI) * 2.0)) * pow(t_2, (t_0 + 0.5))) * exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_1)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 7.0;
	double t_2 = t_1 + 0.5;
	return (Math.PI / Math.sin((Math.PI * z))) * (((Math.sqrt((Math.PI * 2.0)) * Math.pow(t_2, (t_0 + 0.5))) * Math.exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_1)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	t_1 = t_0 + 7.0
	t_2 = t_1 + 0.5
	return (math.pi / math.sin((math.pi * z))) * (((math.sqrt((math.pi * 2.0)) * math.pow(t_2, (t_0 + 0.5))) * math.exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_1)) + (1.5056327351493116e-7 / (t_0 + 8.0))))

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	t_1 = Float64(t_0 + 7.0)
	t_2 = Float64(t_1 + 0.5)
	return Float64(Float64(pi / sin(Float64(pi * z))) * Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (t_2 ^ Float64(t_0 + 0.5))) * exp(Float64(-t_2))) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(0.9999999999998099 + Float64(676.5203681218851 / Float64(t_0 + 1.0))) + Float64(-1259.1392167224028 / Float64(t_0 + 2.0))) + Float64(771.3234287776531 / Float64(t_0 + 3.0))) + Float64(-176.6150291621406 / Float64(t_0 + 4.0))) + Float64(12.507343278686905 / Float64(t_0 + 5.0))) + Float64(-0.13857109526572012 / Float64(t_0 + 6.0))) + Float64(9.984369578019572e-6 / t_1)) + Float64(1.5056327351493116e-7 / Float64(t_0 + 8.0)))))
end

MATLAB

function tmp = code(z)
	t_0 = (1.0 - z) - 1.0;
	t_1 = t_0 + 7.0;
	t_2 = t_1 + 0.5;
	tmp = (pi / sin((pi * z))) * (((sqrt((pi * 2.0)) * (t_2 ^ (t_0 + 0.5))) * exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_1)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 + 7.0), $MachinePrecision]}, Block[{t$95$2 = N[(t$95$1 + 0.5), $MachinePrecision]}, N[(N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[t$95$2, N[(t$95$0 + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Exp[(-t$95$2)], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(0.9999999999998099 + N[(676.5203681218851 / N[(t$95$0 + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-1259.1392167224028 / N[(t$95$0 + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(771.3234287776531 / N[(t$95$0 + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-176.6150291621406 / N[(t$95$0 + 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(12.507343278686905 / N[(t$95$0 + 5.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-0.13857109526572012 / N[(t$95$0 + 6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(9.984369578019572e-6 / t$95$1), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(t$95$0 + 8.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]

Alternative 1: 98.5% accurate, 0.5× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ t_1 := t\_0 + 7\\ t_2 := t\_1 + 0.5\\ t_3 := \frac{\pi}{\sin \left(\pi \cdot z\right)}\\ t_4 := \frac{-0.13857109526572012}{t\_0 + 6}\\ t_5 := \frac{9.984369578019572 \cdot 10^{-6}}{t\_1}\\ t_6 := -1 \cdot z + 7\\ t_7 := t\_6 + 0.5\\ t_8 := \sqrt{\pi \cdot 2} \cdot {t\_2}^{\left(t\_0 + 0.5\right)}\\ t_9 := \frac{1.5056327351493116 \cdot 10^{-7}}{t\_0 + 8}\\ \mathbf{if}\;t\_3 \cdot \left(\left(t\_8 \cdot e^{-t\_2}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{t\_0 + 1}\right) + \frac{-1259.1392167224028}{t\_0 + 2}\right) + \frac{771.3234287776531}{t\_0 + 3}\right) + \frac{-176.6150291621406}{t\_0 + 4}\right) + \frac{12.507343278686905}{t\_0 + 5}\right) + t\_4\right) + t\_5\right) + t\_9\right)\right) \leq 20000000:\\ \;\;\;\;t\_3 \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {t\_7}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-t\_7}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{t\_6}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{-1 \cdot z + 8}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;t\_3 \cdot \left(\left(t\_8 \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + t\_4\right) + t\_5\right) + t\_9\right)\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0))
        (t_1 (+ t_0 7.0))
        (t_2 (+ t_1 0.5))
        (t_3 (/ PI (sin (* PI z))))
        (t_4 (/ -0.13857109526572012 (+ t_0 6.0)))
        (t_5 (/ 9.984369578019572e-6 t_1))
        (t_6 (+ (* -1.0 z) 7.0))
        (t_7 (+ t_6 0.5))
        (t_8 (* (sqrt (* PI 2.0)) (pow t_2 (+ t_0 0.5))))
        (t_9 (/ 1.5056327351493116e-7 (+ t_0 8.0))))
   (if (<=
        (*
         t_3
         (*
          (* t_8 (exp (- t_2)))
          (+
           (+
            (+
             (+
              (+
               (+
                (+
                 (+ 0.9999999999998099 (/ 676.5203681218851 (+ t_0 1.0)))
                 (/ -1259.1392167224028 (+ t_0 2.0)))
                (/ 771.3234287776531 (+ t_0 3.0)))
               (/ -176.6150291621406 (+ t_0 4.0)))
              (/ 12.507343278686905 (+ t_0 5.0)))
             t_4)
            t_5)
           t_9)))
        20000000.0)
     (*
      t_3
      (*
       (*
        (* (* (sqrt PI) (sqrt 2.0)) (pow t_7 (+ (* -1.0 z) 0.5)))
        (exp (- t_7)))
       (+
        (+
         (+
          (+
           (+
            (+
             (+
              (+ 0.9999999999998099 (/ 676.5203681218851 (+ (* -1.0 z) 1.0)))
              (/ -1259.1392167224028 (+ (* -1.0 z) 2.0)))
             (/ 771.3234287776531 (+ (* -1.0 z) 3.0)))
            (/ -176.6150291621406 (+ (* -1.0 z) 4.0)))
           (/ 12.507343278686905 (+ (* -1.0 z) 5.0)))
          (/ -0.13857109526572012 (+ (* -1.0 z) 6.0)))
         (/ 9.984369578019572e-6 t_6))
        (/ 1.5056327351493116e-7 (+ (* -1.0 z) 8.0)))))
     (*
      t_3
      (*
       (* t_8 (+ (exp -7.5) (* z (exp -7.5))))
       (+
        (+ (+ (+ 263.4062807184368 (* 436.9000215473151 z)) t_4) t_5)
        t_9))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 7.0;
	double t_2 = t_1 + 0.5;
	double t_3 = ((double) M_PI) / sin((((double) M_PI) * z));
	double t_4 = -0.13857109526572012 / (t_0 + 6.0);
	double t_5 = 9.984369578019572e-6 / t_1;
	double t_6 = (-1.0 * z) + 7.0;
	double t_7 = t_6 + 0.5;
	double t_8 = sqrt((((double) M_PI) * 2.0)) * pow(t_2, (t_0 + 0.5));
	double t_9 = 1.5056327351493116e-7 / (t_0 + 8.0);
	double tmp;
	if ((t_3 * ((t_8 * exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + t_4) + t_5) + t_9))) <= 20000000.0) {
		tmp = t_3 * ((((sqrt(((double) M_PI)) * sqrt(2.0)) * pow(t_7, ((-1.0 * z) + 0.5))) * exp(-t_7)) * ((((((((0.9999999999998099 + (676.5203681218851 / ((-1.0 * z) + 1.0))) + (-1259.1392167224028 / ((-1.0 * z) + 2.0))) + (771.3234287776531 / ((-1.0 * z) + 3.0))) + (-176.6150291621406 / ((-1.0 * z) + 4.0))) + (12.507343278686905 / ((-1.0 * z) + 5.0))) + (-0.13857109526572012 / ((-1.0 * z) + 6.0))) + (9.984369578019572e-6 / t_6)) + (1.5056327351493116e-7 / ((-1.0 * z) + 8.0))));
	} else {
		tmp = t_3 * ((t_8 * (exp(-7.5) + (z * exp(-7.5)))) * ((((263.4062807184368 + (436.9000215473151 * z)) + t_4) + t_5) + t_9));
	}
	return tmp;
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 7.0;
	double t_2 = t_1 + 0.5;
	double t_3 = Math.PI / Math.sin((Math.PI * z));
	double t_4 = -0.13857109526572012 / (t_0 + 6.0);
	double t_5 = 9.984369578019572e-6 / t_1;
	double t_6 = (-1.0 * z) + 7.0;
	double t_7 = t_6 + 0.5;
	double t_8 = Math.sqrt((Math.PI * 2.0)) * Math.pow(t_2, (t_0 + 0.5));
	double t_9 = 1.5056327351493116e-7 / (t_0 + 8.0);
	double tmp;
	if ((t_3 * ((t_8 * Math.exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + t_4) + t_5) + t_9))) <= 20000000.0) {
		tmp = t_3 * ((((Math.sqrt(Math.PI) * Math.sqrt(2.0)) * Math.pow(t_7, ((-1.0 * z) + 0.5))) * Math.exp(-t_7)) * ((((((((0.9999999999998099 + (676.5203681218851 / ((-1.0 * z) + 1.0))) + (-1259.1392167224028 / ((-1.0 * z) + 2.0))) + (771.3234287776531 / ((-1.0 * z) + 3.0))) + (-176.6150291621406 / ((-1.0 * z) + 4.0))) + (12.507343278686905 / ((-1.0 * z) + 5.0))) + (-0.13857109526572012 / ((-1.0 * z) + 6.0))) + (9.984369578019572e-6 / t_6)) + (1.5056327351493116e-7 / ((-1.0 * z) + 8.0))));
	} else {
		tmp = t_3 * ((t_8 * (Math.exp(-7.5) + (z * Math.exp(-7.5)))) * ((((263.4062807184368 + (436.9000215473151 * z)) + t_4) + t_5) + t_9));
	}
	return tmp;
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	t_1 = t_0 + 7.0
	t_2 = t_1 + 0.5
	t_3 = math.pi / math.sin((math.pi * z))
	t_4 = -0.13857109526572012 / (t_0 + 6.0)
	t_5 = 9.984369578019572e-6 / t_1
	t_6 = (-1.0 * z) + 7.0
	t_7 = t_6 + 0.5
	t_8 = math.sqrt((math.pi * 2.0)) * math.pow(t_2, (t_0 + 0.5))
	t_9 = 1.5056327351493116e-7 / (t_0 + 8.0)
	tmp = 0
	if (t_3 * ((t_8 * math.exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + t_4) + t_5) + t_9))) <= 20000000.0:
		tmp = t_3 * ((((math.sqrt(math.pi) * math.sqrt(2.0)) * math.pow(t_7, ((-1.0 * z) + 0.5))) * math.exp(-t_7)) * ((((((((0.9999999999998099 + (676.5203681218851 / ((-1.0 * z) + 1.0))) + (-1259.1392167224028 / ((-1.0 * z) + 2.0))) + (771.3234287776531 / ((-1.0 * z) + 3.0))) + (-176.6150291621406 / ((-1.0 * z) + 4.0))) + (12.507343278686905 / ((-1.0 * z) + 5.0))) + (-0.13857109526572012 / ((-1.0 * z) + 6.0))) + (9.984369578019572e-6 / t_6)) + (1.5056327351493116e-7 / ((-1.0 * z) + 8.0))))
	else:
		tmp = t_3 * ((t_8 * (math.exp(-7.5) + (z * math.exp(-7.5)))) * ((((263.4062807184368 + (436.9000215473151 * z)) + t_4) + t_5) + t_9))
	return tmp

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	t_1 = Float64(t_0 + 7.0)
	t_2 = Float64(t_1 + 0.5)
	t_3 = Float64(pi / sin(Float64(pi * z)))
	t_4 = Float64(-0.13857109526572012 / Float64(t_0 + 6.0))
	t_5 = Float64(9.984369578019572e-6 / t_1)
	t_6 = Float64(Float64(-1.0 * z) + 7.0)
	t_7 = Float64(t_6 + 0.5)
	t_8 = Float64(sqrt(Float64(pi * 2.0)) * (t_2 ^ Float64(t_0 + 0.5)))
	t_9 = Float64(1.5056327351493116e-7 / Float64(t_0 + 8.0))
	tmp = 0.0
	if (Float64(t_3 * Float64(Float64(t_8 * exp(Float64(-t_2))) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(0.9999999999998099 + Float64(676.5203681218851 / Float64(t_0 + 1.0))) + Float64(-1259.1392167224028 / Float64(t_0 + 2.0))) + Float64(771.3234287776531 / Float64(t_0 + 3.0))) + Float64(-176.6150291621406 / Float64(t_0 + 4.0))) + Float64(12.507343278686905 / Float64(t_0 + 5.0))) + t_4) + t_5) + t_9))) <= 20000000.0)
		tmp = Float64(t_3 * Float64(Float64(Float64(Float64(sqrt(pi) * sqrt(2.0)) * (t_7 ^ Float64(Float64(-1.0 * z) + 0.5))) * exp(Float64(-t_7))) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(0.9999999999998099 + Float64(676.5203681218851 / Float64(Float64(-1.0 * z) + 1.0))) + Float64(-1259.1392167224028 / Float64(Float64(-1.0 * z) + 2.0))) + Float64(771.3234287776531 / Float64(Float64(-1.0 * z) + 3.0))) + Float64(-176.6150291621406 / Float64(Float64(-1.0 * z) + 4.0))) + Float64(12.507343278686905 / Float64(Float64(-1.0 * z) + 5.0))) + Float64(-0.13857109526572012 / Float64(Float64(-1.0 * z) + 6.0))) + Float64(9.984369578019572e-6 / t_6)) + Float64(1.5056327351493116e-7 / Float64(Float64(-1.0 * z) + 8.0)))));
	else
		tmp = Float64(t_3 * Float64(Float64(t_8 * Float64(exp(-7.5) + Float64(z * exp(-7.5)))) * Float64(Float64(Float64(Float64(263.4062807184368 + Float64(436.9000215473151 * z)) + t_4) + t_5) + t_9)));
	end
	return tmp
end

MATLAB

function tmp_2 = code(z)
	t_0 = (1.0 - z) - 1.0;
	t_1 = t_0 + 7.0;
	t_2 = t_1 + 0.5;
	t_3 = pi / sin((pi * z));
	t_4 = -0.13857109526572012 / (t_0 + 6.0);
	t_5 = 9.984369578019572e-6 / t_1;
	t_6 = (-1.0 * z) + 7.0;
	t_7 = t_6 + 0.5;
	t_8 = sqrt((pi * 2.0)) * (t_2 ^ (t_0 + 0.5));
	t_9 = 1.5056327351493116e-7 / (t_0 + 8.0);
	tmp = 0.0;
	if ((t_3 * ((t_8 * exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + t_4) + t_5) + t_9))) <= 20000000.0)
		tmp = t_3 * ((((sqrt(pi) * sqrt(2.0)) * (t_7 ^ ((-1.0 * z) + 0.5))) * exp(-t_7)) * ((((((((0.9999999999998099 + (676.5203681218851 / ((-1.0 * z) + 1.0))) + (-1259.1392167224028 / ((-1.0 * z) + 2.0))) + (771.3234287776531 / ((-1.0 * z) + 3.0))) + (-176.6150291621406 / ((-1.0 * z) + 4.0))) + (12.507343278686905 / ((-1.0 * z) + 5.0))) + (-0.13857109526572012 / ((-1.0 * z) + 6.0))) + (9.984369578019572e-6 / t_6)) + (1.5056327351493116e-7 / ((-1.0 * z) + 8.0))));
	else
		tmp = t_3 * ((t_8 * (exp(-7.5) + (z * exp(-7.5)))) * ((((263.4062807184368 + (436.9000215473151 * z)) + t_4) + t_5) + t_9));
	end
	tmp_2 = tmp;
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 + 7.0), $MachinePrecision]}, Block[{t$95$2 = N[(t$95$1 + 0.5), $MachinePrecision]}, Block[{t$95$3 = N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = N[(-0.13857109526572012 / N[(t$95$0 + 6.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[(9.984369578019572e-6 / t$95$1), $MachinePrecision]}, Block[{t$95$6 = N[(N[(-1.0 * z), $MachinePrecision] + 7.0), $MachinePrecision]}, Block[{t$95$7 = N[(t$95$6 + 0.5), $MachinePrecision]}, Block[{t$95$8 = N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[t$95$2, N[(t$95$0 + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$9 = N[(1.5056327351493116e-7 / N[(t$95$0 + 8.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(t$95$3 * N[(N[(t$95$8 * N[Exp[(-t$95$2)], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(0.9999999999998099 + N[(676.5203681218851 / N[(t$95$0 + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-1259.1392167224028 / N[(t$95$0 + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(771.3234287776531 / N[(t$95$0 + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-176.6150291621406 / N[(t$95$0 + 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(12.507343278686905 / N[(t$95$0 + 5.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision] + t$95$5), $MachinePrecision] + t$95$9), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 20000000.0], N[(t$95$3 * N[(N[(N[(N[(N[Sqrt[Pi], $MachinePrecision] * N[Sqrt[2.0], $MachinePrecision]), $MachinePrecision] * N[Power[t$95$7, N[(N[(-1.0 * z), $MachinePrecision] + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Exp[(-t$95$7)], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(0.9999999999998099 + N[(676.5203681218851 / N[(N[(-1.0 * z), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-1259.1392167224028 / N[(N[(-1.0 * z), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(771.3234287776531 / N[(N[(-1.0 * z), $MachinePrecision] + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-176.6150291621406 / N[(N[(-1.0 * z), $MachinePrecision] + 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(12.507343278686905 / N[(N[(-1.0 * z), $MachinePrecision] + 5.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-0.13857109526572012 / N[(N[(-1.0 * z), $MachinePrecision] + 6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(9.984369578019572e-6 / t$95$6), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(N[(-1.0 * z), $MachinePrecision] + 8.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(t$95$3 * N[(N[(t$95$8 * N[(N[Exp[-7.5], $MachinePrecision] + N[(z * N[Exp[-7.5], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(263.4062807184368 + N[(436.9000215473151 * z), $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision] + t$95$5), $MachinePrecision] + t$95$9), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]]]]]

Derivation

1. Split input into 2 regimes

2. if (*.f64 (/.f64 (PI.f64) (sin.f64 (*.f64 (PI.f64) z))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (+.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)) #s(literal 1/2 binary64)) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (exp.f64 (neg.f64 (+.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)) #s(literal 1/2 binary64))))) (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 #s(literal 9999999999998099/10000000000000000 binary64) (/.f64 #s(literal 6765203681218851/10000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 1 binary64)))) (/.f64 #s(literal -3147848041806007/2500000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 7713234287776531/10000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal -883075145810703/5000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 4 binary64)))) (/.f64 #s(literal 2501468655737381/200000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 5 binary64)))) (/.f64 #s(literal -3464277381643003/25000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 6 binary64)))) (/.f64 #s(literal 2496092394504893/250000000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)))) (/.f64 #s(literal 3764081837873279/25000000000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 8 binary64)))))) < 2e7

   1. Initial program 97.3%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   2. Step-by-step derivation

      1. lift-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\sqrt{\pi \cdot 2}} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\color{blue}{\mathsf{PI}\left(\right)} \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      3. lift-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\color{blue}{\mathsf{PI}\left(\right) \cdot 2}} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      4. sqrt-prod N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      5. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      6. lower-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\color{blue}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      7. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\color{blue}{\pi}} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      8. lower-sqrt.f64 97.6

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \color{blue}{\sqrt{2}}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. Applied rewrites 97.6%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\pi} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\color{blue}{-1 \cdot z} + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   5. Step-by-step derivation

      1. lower-*.f64 97.5

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot \color{blue}{z} + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   6. Applied rewrites 97.5%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\color{blue}{-1 \cdot z} + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   7. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(\color{blue}{-1 \cdot z} + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   8. Step-by-step derivation

      1. lower-*.f64 97.5

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot \color{blue}{z} + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   9. Applied rewrites 97.5%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(\color{blue}{-1 \cdot z} + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   10. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\color{blue}{-1 \cdot z} + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   11. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot \color{blue}{z} + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   12. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(\color{blue}{-1 \cdot z} + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   13. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\color{blue}{-1 \cdot z} + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   14. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot \color{blue}{z} + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   15. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\color{blue}{-1 \cdot z} + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   16. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\color{blue}{-1 \cdot z} + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   17. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot \color{blue}{z} + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   18. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{\color{blue}{-1 \cdot z} + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   19. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\color{blue}{-1 \cdot z} + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   20. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot \color{blue}{z} + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   21. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{\color{blue}{-1 \cdot z} + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   22. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\color{blue}{-1 \cdot z} + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   23. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot \color{blue}{z} + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   24. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{\color{blue}{-1 \cdot z} + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   25. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{-1 \cdot z + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\color{blue}{-1 \cdot z} + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   26. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot \color{blue}{z} + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   27. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{\color{blue}{-1 \cdot z} + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   28. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{-1 \cdot z + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{-1 \cdot z + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\color{blue}{-1 \cdot z} + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   29. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot \color{blue}{z} + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   30. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{\color{blue}{-1 \cdot z} + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   31. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{-1 \cdot z + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{-1 \cdot z + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{-1 \cdot z + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\color{blue}{-1 \cdot z} + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   32. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{-1 \cdot \color{blue}{z} + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   33. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\color{blue}{-1 \cdot z} + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   34. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{-1 \cdot z + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{-1 \cdot z + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{-1 \cdot z + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{-1 \cdot z + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\color{blue}{-1 \cdot z} + 8}\right)\right) \]
   35. Step-by-step derivation

       1. lower-*.f64 97.5

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{-1 \cdot z + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{-1 \cdot \color{blue}{z} + 8}\right)\right) \]

   36. Applied rewrites 97.5%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{-1 \cdot z + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\color{blue}{-1 \cdot z} + 8}\right)\right) \]

   if 2e7 < (*.f64 (/.f64 (PI.f64) (sin.f64 (*.f64 (PI.f64) z))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (+.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)) #s(literal 1/2 binary64)) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (exp.f64 (neg.f64 (+.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)) #s(literal 1/2 binary64))))) (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 #s(literal 9999999999998099/10000000000000000 binary64) (/.f64 #s(literal 6765203681218851/10000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 1 binary64)))) (/.f64 #s(literal -3147848041806007/2500000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 7713234287776531/10000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal -883075145810703/5000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 4 binary64)))) (/.f64 #s(literal 2501468655737381/200000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 5 binary64)))) (/.f64 #s(literal -3464277381643003/25000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 6 binary64)))) (/.f64 #s(literal 2496092394504893/250000000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)))) (/.f64 #s(literal 3764081837873279/25000000000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 8 binary64))))))

   1. Initial program 95.7%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right)} + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   3. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \color{blue}{\frac{39321001939258358983}{90000000000000000} \cdot z}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lower-*.f64 96.5

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot \color{blue}{z}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. Applied rewrites 96.5%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(263.4062807184368 + 436.9000215473151 \cdot z\right)} + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   5. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   6. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + \color{blue}{z \cdot e^{\frac{-15}{2}}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lift-exp.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + \color{blue}{z} \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      3. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot \color{blue}{e^{\frac{-15}{2}}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      4. lift-exp.f64 98.3

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   7. Applied rewrites 98.3%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \color{blue}{\left(e^{-7.5} + z \cdot e^{-7.5}\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
3. Recombined 2 regimes into one program.
4. Add Preprocessing

Alternative 2: 98.4% accurate, 0.5× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ t_1 := t\_0 + 7\\ t_2 := t\_1 + 0.5\\ t_3 := \frac{\pi}{\sin \left(\pi \cdot z\right)}\\ t_4 := -1 \cdot z + 7\\ t_5 := \frac{9.984369578019572 \cdot 10^{-6}}{t\_1}\\ t_6 := \sqrt{\pi \cdot 2}\\ t_7 := \frac{-0.13857109526572012}{t\_0 + 6}\\ t_8 := t\_4 + 0.5\\ t_9 := t\_6 \cdot {t\_2}^{\left(t\_0 + 0.5\right)}\\ t_10 := \frac{1.5056327351493116 \cdot 10^{-7}}{t\_0 + 8}\\ \mathbf{if}\;t\_3 \cdot \left(\left(t\_9 \cdot e^{-t\_2}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{t\_0 + 1}\right) + \frac{-1259.1392167224028}{t\_0 + 2}\right) + \frac{771.3234287776531}{t\_0 + 3}\right) + \frac{-176.6150291621406}{t\_0 + 4}\right) + \frac{12.507343278686905}{t\_0 + 5}\right) + t\_7\right) + t\_5\right) + t\_10\right)\right) \leq 20000000:\\ \;\;\;\;t\_3 \cdot \left(\left(\left(t\_6 \cdot {t\_8}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-t\_8}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{t\_4}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{-1 \cdot z + 8}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;t\_3 \cdot \left(\left(t\_9 \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + t\_7\right) + t\_5\right) + t\_10\right)\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0))
        (t_1 (+ t_0 7.0))
        (t_2 (+ t_1 0.5))
        (t_3 (/ PI (sin (* PI z))))
        (t_4 (+ (* -1.0 z) 7.0))
        (t_5 (/ 9.984369578019572e-6 t_1))
        (t_6 (sqrt (* PI 2.0)))
        (t_7 (/ -0.13857109526572012 (+ t_0 6.0)))
        (t_8 (+ t_4 0.5))
        (t_9 (* t_6 (pow t_2 (+ t_0 0.5))))
        (t_10 (/ 1.5056327351493116e-7 (+ t_0 8.0))))
   (if (<=
        (*
         t_3
         (*
          (* t_9 (exp (- t_2)))
          (+
           (+
            (+
             (+
              (+
               (+
                (+
                 (+ 0.9999999999998099 (/ 676.5203681218851 (+ t_0 1.0)))
                 (/ -1259.1392167224028 (+ t_0 2.0)))
                (/ 771.3234287776531 (+ t_0 3.0)))
               (/ -176.6150291621406 (+ t_0 4.0)))
              (/ 12.507343278686905 (+ t_0 5.0)))
             t_7)
            t_5)
           t_10)))
        20000000.0)
     (*
      t_3
      (*
       (* (* t_6 (pow t_8 (+ (* -1.0 z) 0.5))) (exp (- t_8)))
       (+
        (+
         (+
          (+
           (+
            (+
             (+
              (+ 0.9999999999998099 (/ 676.5203681218851 (+ (* -1.0 z) 1.0)))
              (/ -1259.1392167224028 (+ (* -1.0 z) 2.0)))
             (/ 771.3234287776531 (+ (* -1.0 z) 3.0)))
            (/ -176.6150291621406 (+ (* -1.0 z) 4.0)))
           (/ 12.507343278686905 (+ (* -1.0 z) 5.0)))
          (/ -0.13857109526572012 (+ (* -1.0 z) 6.0)))
         (/ 9.984369578019572e-6 t_4))
        (/ 1.5056327351493116e-7 (+ (* -1.0 z) 8.0)))))
     (*
      t_3
      (*
       (* t_9 (+ (exp -7.5) (* z (exp -7.5))))
       (+
        (+ (+ (+ 263.4062807184368 (* 436.9000215473151 z)) t_7) t_5)
        t_10))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 7.0;
	double t_2 = t_1 + 0.5;
	double t_3 = ((double) M_PI) / sin((((double) M_PI) * z));
	double t_4 = (-1.0 * z) + 7.0;
	double t_5 = 9.984369578019572e-6 / t_1;
	double t_6 = sqrt((((double) M_PI) * 2.0));
	double t_7 = -0.13857109526572012 / (t_0 + 6.0);
	double t_8 = t_4 + 0.5;
	double t_9 = t_6 * pow(t_2, (t_0 + 0.5));
	double t_10 = 1.5056327351493116e-7 / (t_0 + 8.0);
	double tmp;
	if ((t_3 * ((t_9 * exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + t_7) + t_5) + t_10))) <= 20000000.0) {
		tmp = t_3 * (((t_6 * pow(t_8, ((-1.0 * z) + 0.5))) * exp(-t_8)) * ((((((((0.9999999999998099 + (676.5203681218851 / ((-1.0 * z) + 1.0))) + (-1259.1392167224028 / ((-1.0 * z) + 2.0))) + (771.3234287776531 / ((-1.0 * z) + 3.0))) + (-176.6150291621406 / ((-1.0 * z) + 4.0))) + (12.507343278686905 / ((-1.0 * z) + 5.0))) + (-0.13857109526572012 / ((-1.0 * z) + 6.0))) + (9.984369578019572e-6 / t_4)) + (1.5056327351493116e-7 / ((-1.0 * z) + 8.0))));
	} else {
		tmp = t_3 * ((t_9 * (exp(-7.5) + (z * exp(-7.5)))) * ((((263.4062807184368 + (436.9000215473151 * z)) + t_7) + t_5) + t_10));
	}
	return tmp;
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 7.0;
	double t_2 = t_1 + 0.5;
	double t_3 = Math.PI / Math.sin((Math.PI * z));
	double t_4 = (-1.0 * z) + 7.0;
	double t_5 = 9.984369578019572e-6 / t_1;
	double t_6 = Math.sqrt((Math.PI * 2.0));
	double t_7 = -0.13857109526572012 / (t_0 + 6.0);
	double t_8 = t_4 + 0.5;
	double t_9 = t_6 * Math.pow(t_2, (t_0 + 0.5));
	double t_10 = 1.5056327351493116e-7 / (t_0 + 8.0);
	double tmp;
	if ((t_3 * ((t_9 * Math.exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + t_7) + t_5) + t_10))) <= 20000000.0) {
		tmp = t_3 * (((t_6 * Math.pow(t_8, ((-1.0 * z) + 0.5))) * Math.exp(-t_8)) * ((((((((0.9999999999998099 + (676.5203681218851 / ((-1.0 * z) + 1.0))) + (-1259.1392167224028 / ((-1.0 * z) + 2.0))) + (771.3234287776531 / ((-1.0 * z) + 3.0))) + (-176.6150291621406 / ((-1.0 * z) + 4.0))) + (12.507343278686905 / ((-1.0 * z) + 5.0))) + (-0.13857109526572012 / ((-1.0 * z) + 6.0))) + (9.984369578019572e-6 / t_4)) + (1.5056327351493116e-7 / ((-1.0 * z) + 8.0))));
	} else {
		tmp = t_3 * ((t_9 * (Math.exp(-7.5) + (z * Math.exp(-7.5)))) * ((((263.4062807184368 + (436.9000215473151 * z)) + t_7) + t_5) + t_10));
	}
	return tmp;
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	t_1 = t_0 + 7.0
	t_2 = t_1 + 0.5
	t_3 = math.pi / math.sin((math.pi * z))
	t_4 = (-1.0 * z) + 7.0
	t_5 = 9.984369578019572e-6 / t_1
	t_6 = math.sqrt((math.pi * 2.0))
	t_7 = -0.13857109526572012 / (t_0 + 6.0)
	t_8 = t_4 + 0.5
	t_9 = t_6 * math.pow(t_2, (t_0 + 0.5))
	t_10 = 1.5056327351493116e-7 / (t_0 + 8.0)
	tmp = 0
	if (t_3 * ((t_9 * math.exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + t_7) + t_5) + t_10))) <= 20000000.0:
		tmp = t_3 * (((t_6 * math.pow(t_8, ((-1.0 * z) + 0.5))) * math.exp(-t_8)) * ((((((((0.9999999999998099 + (676.5203681218851 / ((-1.0 * z) + 1.0))) + (-1259.1392167224028 / ((-1.0 * z) + 2.0))) + (771.3234287776531 / ((-1.0 * z) + 3.0))) + (-176.6150291621406 / ((-1.0 * z) + 4.0))) + (12.507343278686905 / ((-1.0 * z) + 5.0))) + (-0.13857109526572012 / ((-1.0 * z) + 6.0))) + (9.984369578019572e-6 / t_4)) + (1.5056327351493116e-7 / ((-1.0 * z) + 8.0))))
	else:
		tmp = t_3 * ((t_9 * (math.exp(-7.5) + (z * math.exp(-7.5)))) * ((((263.4062807184368 + (436.9000215473151 * z)) + t_7) + t_5) + t_10))
	return tmp

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	t_1 = Float64(t_0 + 7.0)
	t_2 = Float64(t_1 + 0.5)
	t_3 = Float64(pi / sin(Float64(pi * z)))
	t_4 = Float64(Float64(-1.0 * z) + 7.0)
	t_5 = Float64(9.984369578019572e-6 / t_1)
	t_6 = sqrt(Float64(pi * 2.0))
	t_7 = Float64(-0.13857109526572012 / Float64(t_0 + 6.0))
	t_8 = Float64(t_4 + 0.5)
	t_9 = Float64(t_6 * (t_2 ^ Float64(t_0 + 0.5)))
	t_10 = Float64(1.5056327351493116e-7 / Float64(t_0 + 8.0))
	tmp = 0.0
	if (Float64(t_3 * Float64(Float64(t_9 * exp(Float64(-t_2))) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(0.9999999999998099 + Float64(676.5203681218851 / Float64(t_0 + 1.0))) + Float64(-1259.1392167224028 / Float64(t_0 + 2.0))) + Float64(771.3234287776531 / Float64(t_0 + 3.0))) + Float64(-176.6150291621406 / Float64(t_0 + 4.0))) + Float64(12.507343278686905 / Float64(t_0 + 5.0))) + t_7) + t_5) + t_10))) <= 20000000.0)
		tmp = Float64(t_3 * Float64(Float64(Float64(t_6 * (t_8 ^ Float64(Float64(-1.0 * z) + 0.5))) * exp(Float64(-t_8))) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(0.9999999999998099 + Float64(676.5203681218851 / Float64(Float64(-1.0 * z) + 1.0))) + Float64(-1259.1392167224028 / Float64(Float64(-1.0 * z) + 2.0))) + Float64(771.3234287776531 / Float64(Float64(-1.0 * z) + 3.0))) + Float64(-176.6150291621406 / Float64(Float64(-1.0 * z) + 4.0))) + Float64(12.507343278686905 / Float64(Float64(-1.0 * z) + 5.0))) + Float64(-0.13857109526572012 / Float64(Float64(-1.0 * z) + 6.0))) + Float64(9.984369578019572e-6 / t_4)) + Float64(1.5056327351493116e-7 / Float64(Float64(-1.0 * z) + 8.0)))));
	else
		tmp = Float64(t_3 * Float64(Float64(t_9 * Float64(exp(-7.5) + Float64(z * exp(-7.5)))) * Float64(Float64(Float64(Float64(263.4062807184368 + Float64(436.9000215473151 * z)) + t_7) + t_5) + t_10)));
	end
	return tmp
end

MATLAB

function tmp_2 = code(z)
	t_0 = (1.0 - z) - 1.0;
	t_1 = t_0 + 7.0;
	t_2 = t_1 + 0.5;
	t_3 = pi / sin((pi * z));
	t_4 = (-1.0 * z) + 7.0;
	t_5 = 9.984369578019572e-6 / t_1;
	t_6 = sqrt((pi * 2.0));
	t_7 = -0.13857109526572012 / (t_0 + 6.0);
	t_8 = t_4 + 0.5;
	t_9 = t_6 * (t_2 ^ (t_0 + 0.5));
	t_10 = 1.5056327351493116e-7 / (t_0 + 8.0);
	tmp = 0.0;
	if ((t_3 * ((t_9 * exp(-t_2)) * ((((((((0.9999999999998099 + (676.5203681218851 / (t_0 + 1.0))) + (-1259.1392167224028 / (t_0 + 2.0))) + (771.3234287776531 / (t_0 + 3.0))) + (-176.6150291621406 / (t_0 + 4.0))) + (12.507343278686905 / (t_0 + 5.0))) + t_7) + t_5) + t_10))) <= 20000000.0)
		tmp = t_3 * (((t_6 * (t_8 ^ ((-1.0 * z) + 0.5))) * exp(-t_8)) * ((((((((0.9999999999998099 + (676.5203681218851 / ((-1.0 * z) + 1.0))) + (-1259.1392167224028 / ((-1.0 * z) + 2.0))) + (771.3234287776531 / ((-1.0 * z) + 3.0))) + (-176.6150291621406 / ((-1.0 * z) + 4.0))) + (12.507343278686905 / ((-1.0 * z) + 5.0))) + (-0.13857109526572012 / ((-1.0 * z) + 6.0))) + (9.984369578019572e-6 / t_4)) + (1.5056327351493116e-7 / ((-1.0 * z) + 8.0))));
	else
		tmp = t_3 * ((t_9 * (exp(-7.5) + (z * exp(-7.5)))) * ((((263.4062807184368 + (436.9000215473151 * z)) + t_7) + t_5) + t_10));
	end
	tmp_2 = tmp;
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 + 7.0), $MachinePrecision]}, Block[{t$95$2 = N[(t$95$1 + 0.5), $MachinePrecision]}, Block[{t$95$3 = N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = N[(N[(-1.0 * z), $MachinePrecision] + 7.0), $MachinePrecision]}, Block[{t$95$5 = N[(9.984369578019572e-6 / t$95$1), $MachinePrecision]}, Block[{t$95$6 = N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$7 = N[(-0.13857109526572012 / N[(t$95$0 + 6.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$8 = N[(t$95$4 + 0.5), $MachinePrecision]}, Block[{t$95$9 = N[(t$95$6 * N[Power[t$95$2, N[(t$95$0 + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$10 = N[(1.5056327351493116e-7 / N[(t$95$0 + 8.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(t$95$3 * N[(N[(t$95$9 * N[Exp[(-t$95$2)], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(0.9999999999998099 + N[(676.5203681218851 / N[(t$95$0 + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-1259.1392167224028 / N[(t$95$0 + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(771.3234287776531 / N[(t$95$0 + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-176.6150291621406 / N[(t$95$0 + 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(12.507343278686905 / N[(t$95$0 + 5.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$7), $MachinePrecision] + t$95$5), $MachinePrecision] + t$95$10), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 20000000.0], N[(t$95$3 * N[(N[(N[(t$95$6 * N[Power[t$95$8, N[(N[(-1.0 * z), $MachinePrecision] + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Exp[(-t$95$8)], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(0.9999999999998099 + N[(676.5203681218851 / N[(N[(-1.0 * z), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-1259.1392167224028 / N[(N[(-1.0 * z), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(771.3234287776531 / N[(N[(-1.0 * z), $MachinePrecision] + 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-176.6150291621406 / N[(N[(-1.0 * z), $MachinePrecision] + 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(12.507343278686905 / N[(N[(-1.0 * z), $MachinePrecision] + 5.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-0.13857109526572012 / N[(N[(-1.0 * z), $MachinePrecision] + 6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(9.984369578019572e-6 / t$95$4), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(N[(-1.0 * z), $MachinePrecision] + 8.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(t$95$3 * N[(N[(t$95$9 * N[(N[Exp[-7.5], $MachinePrecision] + N[(z * N[Exp[-7.5], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(263.4062807184368 + N[(436.9000215473151 * z), $MachinePrecision]), $MachinePrecision] + t$95$7), $MachinePrecision] + t$95$5), $MachinePrecision] + t$95$10), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]]]]]]

Derivation

1. Split input into 2 regimes

2. if (*.f64 (/.f64 (PI.f64) (sin.f64 (*.f64 (PI.f64) z))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (+.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)) #s(literal 1/2 binary64)) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (exp.f64 (neg.f64 (+.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)) #s(literal 1/2 binary64))))) (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 #s(literal 9999999999998099/10000000000000000 binary64) (/.f64 #s(literal 6765203681218851/10000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 1 binary64)))) (/.f64 #s(literal -3147848041806007/2500000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 7713234287776531/10000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal -883075145810703/5000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 4 binary64)))) (/.f64 #s(literal 2501468655737381/200000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 5 binary64)))) (/.f64 #s(literal -3464277381643003/25000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 6 binary64)))) (/.f64 #s(literal 2496092394504893/250000000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)))) (/.f64 #s(literal 3764081837873279/25000000000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 8 binary64)))))) < 2e7

   1. Initial program 97.3%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\color{blue}{-1 \cdot z} + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   3. Step-by-step derivation

      1. lower-*.f64 97.3

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot \color{blue}{z} + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. Applied rewrites 97.3%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\color{blue}{-1 \cdot z} + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   5. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(\color{blue}{-1 \cdot z} + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   6. Step-by-step derivation

      1. lower-*.f64 97.3

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot \color{blue}{z} + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   7. Applied rewrites 97.3%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(\color{blue}{-1 \cdot z} + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   8. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\color{blue}{-1 \cdot z} + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   9. Step-by-step derivation

      1. lower-*.f64 97.3

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot \color{blue}{z} + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   10. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(\color{blue}{-1 \cdot z} + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   11. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\color{blue}{-1 \cdot z} + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   12. Step-by-step derivation

       1. lower-*.f64 97.3

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot \color{blue}{z} + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   13. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\color{blue}{-1 \cdot z} + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   14. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\color{blue}{-1 \cdot z} + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   15. Step-by-step derivation

       1. lower-*.f64 97.3

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot \color{blue}{z} + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   16. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{\color{blue}{-1 \cdot z} + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   17. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\color{blue}{-1 \cdot z} + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   18. Step-by-step derivation

       1. lower-*.f64 97.3

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot \color{blue}{z} + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   19. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{\color{blue}{-1 \cdot z} + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   20. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\color{blue}{-1 \cdot z} + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   21. Step-by-step derivation

       1. lower-*.f64 97.3

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot \color{blue}{z} + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   22. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{\color{blue}{-1 \cdot z} + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   23. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{-1 \cdot z + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\color{blue}{-1 \cdot z} + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   24. Step-by-step derivation

       1. lower-*.f64 97.3

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot \color{blue}{z} + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   25. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{\color{blue}{-1 \cdot z} + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   26. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{-1 \cdot z + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{-1 \cdot z + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\color{blue}{-1 \cdot z} + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   27. Step-by-step derivation

       1. lower-*.f64 97.3

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot \color{blue}{z} + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   28. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{\color{blue}{-1 \cdot z} + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   29. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{-1 \cdot z + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{-1 \cdot z + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{-1 \cdot z + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\color{blue}{-1 \cdot z} + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   30. Step-by-step derivation

       1. lower-*.f64 97.3

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{-1 \cdot \color{blue}{z} + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   31. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\color{blue}{-1 \cdot z} + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   32. Taylor expanded in z around 0

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}^{\left(-1 \cdot z + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{-1 \cdot z + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{-1 \cdot z + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{-1 \cdot z + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{-1 \cdot z + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{-1 \cdot z + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{-1 \cdot z + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{-1 \cdot z + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\color{blue}{-1 \cdot z} + 8}\right)\right) \]
   33. Step-by-step derivation

       1. lower-*.f64 97.3

          \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{-1 \cdot z + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{-1 \cdot \color{blue}{z} + 8}\right)\right) \]

   34. Applied rewrites 97.3%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(-1 \cdot z + 7\right) + 0.5\right)}^{\left(-1 \cdot z + 0.5\right)}\right) \cdot e^{-\left(\left(-1 \cdot z + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{-1 \cdot z + 1}\right) + \frac{-1259.1392167224028}{-1 \cdot z + 2}\right) + \frac{771.3234287776531}{-1 \cdot z + 3}\right) + \frac{-176.6150291621406}{-1 \cdot z + 4}\right) + \frac{12.507343278686905}{-1 \cdot z + 5}\right) + \frac{-0.13857109526572012}{-1 \cdot z + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{-1 \cdot z + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\color{blue}{-1 \cdot z} + 8}\right)\right) \]

   if 2e7 < (*.f64 (/.f64 (PI.f64) (sin.f64 (*.f64 (PI.f64) z))) (*.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (+.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)) #s(literal 1/2 binary64)) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 1/2 binary64)))) (exp.f64 (neg.f64 (+.f64 (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)) #s(literal 1/2 binary64))))) (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 #s(literal 9999999999998099/10000000000000000 binary64) (/.f64 #s(literal 6765203681218851/10000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 1 binary64)))) (/.f64 #s(literal -3147848041806007/2500000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 #s(literal 7713234287776531/10000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 #s(literal -883075145810703/5000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 4 binary64)))) (/.f64 #s(literal 2501468655737381/200000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 5 binary64)))) (/.f64 #s(literal -3464277381643003/25000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 6 binary64)))) (/.f64 #s(literal 2496092394504893/250000000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 7 binary64)))) (/.f64 #s(literal 3764081837873279/25000000000000000000000 binary64) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) z) #s(literal 1 binary64)) #s(literal 8 binary64))))))

   1. Initial program 95.7%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right)} + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   3. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \color{blue}{\frac{39321001939258358983}{90000000000000000} \cdot z}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lower-*.f64 96.5

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot \color{blue}{z}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. Applied rewrites 96.5%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(263.4062807184368 + 436.9000215473151 \cdot z\right)} + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   5. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   6. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + \color{blue}{z \cdot e^{\frac{-15}{2}}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lift-exp.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + \color{blue}{z} \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      3. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot \color{blue}{e^{\frac{-15}{2}}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      4. lift-exp.f64 98.3

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   7. Applied rewrites 98.3%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \color{blue}{\left(e^{-7.5} + z \cdot e^{-7.5}\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
3. Recombined 2 regimes into one program.
4. Add Preprocessing

Alternative 3: 97.9% accurate, 1.2× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ t_1 := t\_0 + 0.5\\ t_2 := \frac{\pi}{\sin \left(\pi \cdot z\right)}\\ t_3 := t\_0 + 7\\ t_4 := t\_3 + 0.5\\ \mathbf{if}\;z \leq -0.6:\\ \;\;\;\;t\_2 \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {7.5}^{t\_1}\right) \cdot e^{-7.5}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;t\_2 \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {t\_4}^{t\_1}\right) \cdot e^{-t\_4}\right) \cdot \left(\left(\left(\left(\left(260.9048120626994 + z \cdot \left(436.3997278161676 + z \cdot \left(544.9358906000987 + 606.656776085461 \cdot z\right)\right)\right) + \frac{12.507343278686905}{t\_0 + 5}\right) + \frac{-0.13857109526572012}{t\_0 + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{t\_3}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{t\_0 + 8}\right)\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0))
        (t_1 (+ t_0 0.5))
        (t_2 (/ PI (sin (* PI z))))
        (t_3 (+ t_0 7.0))
        (t_4 (+ t_3 0.5)))
   (if (<= z -0.6)
     (*
      t_2
      (*
       (* (* (sqrt (* PI 2.0)) (pow 7.5 t_1)) (exp (- 7.5)))
       (- 0.9999999999998099 (/ 24.458333333348836 z))))
     (*
      t_2
      (*
       (* (* (* (sqrt PI) (sqrt 2.0)) (pow t_4 t_1)) (exp (- t_4)))
       (+
        (+
         (+
          (+
           (+
            260.9048120626994
            (*
             z
             (+
              436.3997278161676
              (* z (+ 544.9358906000987 (* 606.656776085461 z))))))
           (/ 12.507343278686905 (+ t_0 5.0)))
          (/ -0.13857109526572012 (+ t_0 6.0)))
         (/ 9.984369578019572e-6 t_3))
        (/ 1.5056327351493116e-7 (+ t_0 8.0))))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 0.5;
	double t_2 = ((double) M_PI) / sin((((double) M_PI) * z));
	double t_3 = t_0 + 7.0;
	double t_4 = t_3 + 0.5;
	double tmp;
	if (z <= -0.6) {
		tmp = t_2 * (((sqrt((((double) M_PI) * 2.0)) * pow(7.5, t_1)) * exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	} else {
		tmp = t_2 * ((((sqrt(((double) M_PI)) * sqrt(2.0)) * pow(t_4, t_1)) * exp(-t_4)) * (((((260.9048120626994 + (z * (436.3997278161676 + (z * (544.9358906000987 + (606.656776085461 * z)))))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_3)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
	}
	return tmp;
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 0.5;
	double t_2 = Math.PI / Math.sin((Math.PI * z));
	double t_3 = t_0 + 7.0;
	double t_4 = t_3 + 0.5;
	double tmp;
	if (z <= -0.6) {
		tmp = t_2 * (((Math.sqrt((Math.PI * 2.0)) * Math.pow(7.5, t_1)) * Math.exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	} else {
		tmp = t_2 * ((((Math.sqrt(Math.PI) * Math.sqrt(2.0)) * Math.pow(t_4, t_1)) * Math.exp(-t_4)) * (((((260.9048120626994 + (z * (436.3997278161676 + (z * (544.9358906000987 + (606.656776085461 * z)))))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_3)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
	}
	return tmp;
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	t_1 = t_0 + 0.5
	t_2 = math.pi / math.sin((math.pi * z))
	t_3 = t_0 + 7.0
	t_4 = t_3 + 0.5
	tmp = 0
	if z <= -0.6:
		tmp = t_2 * (((math.sqrt((math.pi * 2.0)) * math.pow(7.5, t_1)) * math.exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)))
	else:
		tmp = t_2 * ((((math.sqrt(math.pi) * math.sqrt(2.0)) * math.pow(t_4, t_1)) * math.exp(-t_4)) * (((((260.9048120626994 + (z * (436.3997278161676 + (z * (544.9358906000987 + (606.656776085461 * z)))))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_3)) + (1.5056327351493116e-7 / (t_0 + 8.0))))
	return tmp

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	t_1 = Float64(t_0 + 0.5)
	t_2 = Float64(pi / sin(Float64(pi * z)))
	t_3 = Float64(t_0 + 7.0)
	t_4 = Float64(t_3 + 0.5)
	tmp = 0.0
	if (z <= -0.6)
		tmp = Float64(t_2 * Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (7.5 ^ t_1)) * exp(Float64(-7.5))) * Float64(0.9999999999998099 - Float64(24.458333333348836 / z))));
	else
		tmp = Float64(t_2 * Float64(Float64(Float64(Float64(sqrt(pi) * sqrt(2.0)) * (t_4 ^ t_1)) * exp(Float64(-t_4))) * Float64(Float64(Float64(Float64(Float64(260.9048120626994 + Float64(z * Float64(436.3997278161676 + Float64(z * Float64(544.9358906000987 + Float64(606.656776085461 * z)))))) + Float64(12.507343278686905 / Float64(t_0 + 5.0))) + Float64(-0.13857109526572012 / Float64(t_0 + 6.0))) + Float64(9.984369578019572e-6 / t_3)) + Float64(1.5056327351493116e-7 / Float64(t_0 + 8.0)))));
	end
	return tmp
end

MATLAB

function tmp_2 = code(z)
	t_0 = (1.0 - z) - 1.0;
	t_1 = t_0 + 0.5;
	t_2 = pi / sin((pi * z));
	t_3 = t_0 + 7.0;
	t_4 = t_3 + 0.5;
	tmp = 0.0;
	if (z <= -0.6)
		tmp = t_2 * (((sqrt((pi * 2.0)) * (7.5 ^ t_1)) * exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	else
		tmp = t_2 * ((((sqrt(pi) * sqrt(2.0)) * (t_4 ^ t_1)) * exp(-t_4)) * (((((260.9048120626994 + (z * (436.3997278161676 + (z * (544.9358906000987 + (606.656776085461 * z)))))) + (12.507343278686905 / (t_0 + 5.0))) + (-0.13857109526572012 / (t_0 + 6.0))) + (9.984369578019572e-6 / t_3)) + (1.5056327351493116e-7 / (t_0 + 8.0))));
	end
	tmp_2 = tmp;
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 + 0.5), $MachinePrecision]}, Block[{t$95$2 = N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[(t$95$0 + 7.0), $MachinePrecision]}, Block[{t$95$4 = N[(t$95$3 + 0.5), $MachinePrecision]}, If[LessEqual[z, -0.6], N[(t$95$2 * N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[7.5, t$95$1], $MachinePrecision]), $MachinePrecision] * N[Exp[(-7.5)], $MachinePrecision]), $MachinePrecision] * N[(0.9999999999998099 - N[(24.458333333348836 / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(t$95$2 * N[(N[(N[(N[(N[Sqrt[Pi], $MachinePrecision] * N[Sqrt[2.0], $MachinePrecision]), $MachinePrecision] * N[Power[t$95$4, t$95$1], $MachinePrecision]), $MachinePrecision] * N[Exp[(-t$95$4)], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[(N[(260.9048120626994 + N[(z * N[(436.3997278161676 + N[(z * N[(544.9358906000987 + N[(606.656776085461 * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(12.507343278686905 / N[(t$95$0 + 5.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-0.13857109526572012 / N[(t$95$0 + 6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(9.984369578019572e-6 / t$95$3), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(t$95$0 + 8.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]

Derivation

1. Split input into 2 regimes

2. if z < -0.599999999999999978

   1. Initial program 36.6%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. Taylor expanded in z around inf

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(\frac{9999999999998099}{10000000000000000} - \frac{611458333333720910362579}{25000000000000000000000} \cdot \frac{1}{z}\right)}\right) \]
   3. Step-by-step derivation

      1. lower--.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \color{blue}{\frac{611458333333720910362579}{25000000000000000000000} \cdot \frac{1}{z}}\right)\right) \]

      2. mult-flip-rev N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{\color{blue}{z}}\right)\right) \]

      3. lower-/.f64 13.9

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{\color{blue}{z}}\right)\right) \]

   4. Applied rewrites 13.9%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \color{blue}{\left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)}\right) \]

   5. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\color{blue}{\frac{15}{2}}}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{z}\right)\right) \]
   6. Step-by-step derivation

   7. Applied rewrites 10.5%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\color{blue}{7.5}}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right) \]

   8. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\frac{15}{2}}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\color{blue}{\frac{15}{2}}}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{z}\right)\right) \]
   9. Step-by-step derivation

   10. Applied rewrites 71.8%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {7.5}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\color{blue}{7.5}}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right) \]

   if -0.599999999999999978 < z

   1. Initial program 97.4%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   2. Step-by-step derivation

      1. lift-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\sqrt{\pi \cdot 2}} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\color{blue}{\mathsf{PI}\left(\right)} \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      3. lift-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\color{blue}{\mathsf{PI}\left(\right) \cdot 2}} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      4. sqrt-prod N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      5. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      6. lower-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\color{blue}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      7. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\color{blue}{\pi}} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      8. lower-sqrt.f64 97.6

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \color{blue}{\sqrt{2}}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. Applied rewrites 97.6%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\pi} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\color{blue}{\left(\frac{7827144361880981797}{30000000000000000} + z \cdot \left(\frac{314207804027640689}{720000000000000} + z \cdot \left(\frac{4708246094784852251}{8640000000000000} + \frac{62898174544540606049}{103680000000000000} \cdot z\right)\right)\right)} + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   5. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\frac{7827144361880981797}{30000000000000000} + \color{blue}{z \cdot \left(\frac{314207804027640689}{720000000000000} + z \cdot \left(\frac{4708246094784852251}{8640000000000000} + \frac{62898174544540606049}{103680000000000000} \cdot z\right)\right)}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\frac{7827144361880981797}{30000000000000000} + z \cdot \color{blue}{\left(\frac{314207804027640689}{720000000000000} + z \cdot \left(\frac{4708246094784852251}{8640000000000000} + \frac{62898174544540606049}{103680000000000000} \cdot z\right)\right)}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      3. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\frac{7827144361880981797}{30000000000000000} + z \cdot \left(\frac{314207804027640689}{720000000000000} + \color{blue}{z \cdot \left(\frac{4708246094784852251}{8640000000000000} + \frac{62898174544540606049}{103680000000000000} \cdot z\right)}\right)\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      4. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\frac{7827144361880981797}{30000000000000000} + z \cdot \left(\frac{314207804027640689}{720000000000000} + z \cdot \color{blue}{\left(\frac{4708246094784852251}{8640000000000000} + \frac{62898174544540606049}{103680000000000000} \cdot z\right)}\right)\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      5. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\frac{7827144361880981797}{30000000000000000} + z \cdot \left(\frac{314207804027640689}{720000000000000} + z \cdot \left(\frac{4708246094784852251}{8640000000000000} + \color{blue}{\frac{62898174544540606049}{103680000000000000} \cdot z}\right)\right)\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      6. lower-*.f64 98.8

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(260.9048120626994 + z \cdot \left(436.3997278161676 + z \cdot \left(544.9358906000987 + 606.656776085461 \cdot \color{blue}{z}\right)\right)\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   6. Applied rewrites 98.8%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\color{blue}{\left(260.9048120626994 + z \cdot \left(436.3997278161676 + z \cdot \left(544.9358906000987 + 606.656776085461 \cdot z\right)\right)\right)} + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
3. Recombined 2 regimes into one program.
4. Add Preprocessing

Alternative 4: 97.9% accurate, 1.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ t_1 := t\_0 + 0.5\\ t_2 := \left(t\_0 + 7\right) + 0.5\\ t_3 := \frac{\pi}{\sin \left(\pi \cdot z\right)}\\ \mathbf{if}\;z \leq -0.6:\\ \;\;\;\;t\_3 \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {7.5}^{t\_1}\right) \cdot e^{-7.5}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;t\_3 \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {t\_2}^{t\_1}\right) \cdot e^{-t\_2}\right) \cdot \left(263.3831869810514 + z \cdot \left(436.8961725563396 + z \cdot \left(545.0353078428827 + 606.6766809167608 \cdot z\right)\right)\right)\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0))
        (t_1 (+ t_0 0.5))
        (t_2 (+ (+ t_0 7.0) 0.5))
        (t_3 (/ PI (sin (* PI z)))))
   (if (<= z -0.6)
     (*
      t_3
      (*
       (* (* (sqrt (* PI 2.0)) (pow 7.5 t_1)) (exp (- 7.5)))
       (- 0.9999999999998099 (/ 24.458333333348836 z))))
     (*
      t_3
      (*
       (* (* (* (sqrt PI) (sqrt 2.0)) (pow t_2 t_1)) (exp (- t_2)))
       (+
        263.3831869810514
        (*
         z
         (+
          436.8961725563396
          (* z (+ 545.0353078428827 (* 606.6766809167608 z)))))))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 0.5;
	double t_2 = (t_0 + 7.0) + 0.5;
	double t_3 = ((double) M_PI) / sin((((double) M_PI) * z));
	double tmp;
	if (z <= -0.6) {
		tmp = t_3 * (((sqrt((((double) M_PI) * 2.0)) * pow(7.5, t_1)) * exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	} else {
		tmp = t_3 * ((((sqrt(((double) M_PI)) * sqrt(2.0)) * pow(t_2, t_1)) * exp(-t_2)) * (263.3831869810514 + (z * (436.8961725563396 + (z * (545.0353078428827 + (606.6766809167608 * z)))))));
	}
	return tmp;
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 0.5;
	double t_2 = (t_0 + 7.0) + 0.5;
	double t_3 = Math.PI / Math.sin((Math.PI * z));
	double tmp;
	if (z <= -0.6) {
		tmp = t_3 * (((Math.sqrt((Math.PI * 2.0)) * Math.pow(7.5, t_1)) * Math.exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	} else {
		tmp = t_3 * ((((Math.sqrt(Math.PI) * Math.sqrt(2.0)) * Math.pow(t_2, t_1)) * Math.exp(-t_2)) * (263.3831869810514 + (z * (436.8961725563396 + (z * (545.0353078428827 + (606.6766809167608 * z)))))));
	}
	return tmp;
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	t_1 = t_0 + 0.5
	t_2 = (t_0 + 7.0) + 0.5
	t_3 = math.pi / math.sin((math.pi * z))
	tmp = 0
	if z <= -0.6:
		tmp = t_3 * (((math.sqrt((math.pi * 2.0)) * math.pow(7.5, t_1)) * math.exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)))
	else:
		tmp = t_3 * ((((math.sqrt(math.pi) * math.sqrt(2.0)) * math.pow(t_2, t_1)) * math.exp(-t_2)) * (263.3831869810514 + (z * (436.8961725563396 + (z * (545.0353078428827 + (606.6766809167608 * z)))))))
	return tmp

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	t_1 = Float64(t_0 + 0.5)
	t_2 = Float64(Float64(t_0 + 7.0) + 0.5)
	t_3 = Float64(pi / sin(Float64(pi * z)))
	tmp = 0.0
	if (z <= -0.6)
		tmp = Float64(t_3 * Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (7.5 ^ t_1)) * exp(Float64(-7.5))) * Float64(0.9999999999998099 - Float64(24.458333333348836 / z))));
	else
		tmp = Float64(t_3 * Float64(Float64(Float64(Float64(sqrt(pi) * sqrt(2.0)) * (t_2 ^ t_1)) * exp(Float64(-t_2))) * Float64(263.3831869810514 + Float64(z * Float64(436.8961725563396 + Float64(z * Float64(545.0353078428827 + Float64(606.6766809167608 * z))))))));
	end
	return tmp
end

MATLAB

function tmp_2 = code(z)
	t_0 = (1.0 - z) - 1.0;
	t_1 = t_0 + 0.5;
	t_2 = (t_0 + 7.0) + 0.5;
	t_3 = pi / sin((pi * z));
	tmp = 0.0;
	if (z <= -0.6)
		tmp = t_3 * (((sqrt((pi * 2.0)) * (7.5 ^ t_1)) * exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	else
		tmp = t_3 * ((((sqrt(pi) * sqrt(2.0)) * (t_2 ^ t_1)) * exp(-t_2)) * (263.3831869810514 + (z * (436.8961725563396 + (z * (545.0353078428827 + (606.6766809167608 * z)))))));
	end
	tmp_2 = tmp;
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 + 0.5), $MachinePrecision]}, Block[{t$95$2 = N[(N[(t$95$0 + 7.0), $MachinePrecision] + 0.5), $MachinePrecision]}, Block[{t$95$3 = N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -0.6], N[(t$95$3 * N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[7.5, t$95$1], $MachinePrecision]), $MachinePrecision] * N[Exp[(-7.5)], $MachinePrecision]), $MachinePrecision] * N[(0.9999999999998099 - N[(24.458333333348836 / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(t$95$3 * N[(N[(N[(N[(N[Sqrt[Pi], $MachinePrecision] * N[Sqrt[2.0], $MachinePrecision]), $MachinePrecision] * N[Power[t$95$2, t$95$1], $MachinePrecision]), $MachinePrecision] * N[Exp[(-t$95$2)], $MachinePrecision]), $MachinePrecision] * N[(263.3831869810514 + N[(z * N[(436.8961725563396 + N[(z * N[(545.0353078428827 + N[(606.6766809167608 * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]

Derivation

1. Split input into 2 regimes

2. if z < -0.599999999999999978

   1. Initial program 36.6%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. Taylor expanded in z around inf

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(\frac{9999999999998099}{10000000000000000} - \frac{611458333333720910362579}{25000000000000000000000} \cdot \frac{1}{z}\right)}\right) \]
   3. Step-by-step derivation

      1. lower--.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \color{blue}{\frac{611458333333720910362579}{25000000000000000000000} \cdot \frac{1}{z}}\right)\right) \]

      2. mult-flip-rev N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{\color{blue}{z}}\right)\right) \]

      3. lower-/.f64 13.9

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{\color{blue}{z}}\right)\right) \]

   4. Applied rewrites 13.9%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \color{blue}{\left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)}\right) \]

   5. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\color{blue}{\frac{15}{2}}}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{z}\right)\right) \]
   6. Step-by-step derivation

   7. Applied rewrites 10.5%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\color{blue}{7.5}}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right) \]

   8. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\frac{15}{2}}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\color{blue}{\frac{15}{2}}}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{z}\right)\right) \]
   9. Step-by-step derivation

   10. Applied rewrites 71.8%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {7.5}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\color{blue}{7.5}}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right) \]

   if -0.599999999999999978 < z

   1. Initial program 97.4%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   2. Step-by-step derivation

      1. lift-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\sqrt{\pi \cdot 2}} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\color{blue}{\mathsf{PI}\left(\right)} \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      3. lift-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\color{blue}{\mathsf{PI}\left(\right) \cdot 2}} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      4. sqrt-prod N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      5. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      6. lower-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\color{blue}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      7. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\color{blue}{\pi}} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      8. lower-sqrt.f64 97.6

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \color{blue}{\sqrt{2}}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. Applied rewrites 97.6%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\pi} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)\right)\right)}\right) \]
   5. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + \color{blue}{z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)\right)}\right)\right) \]

      2. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \color{blue}{\left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)\right)}\right)\right) \]

      3. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + \color{blue}{z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)}\right)\right)\right) \]

      4. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \color{blue}{\left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)}\right)\right)\right) \]

      5. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \color{blue}{\frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z}\right)\right)\right)\right) \]

      6. lower-*.f64 98.8

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(263.3831869810514 + z \cdot \left(436.8961725563396 + z \cdot \left(545.0353078428827 + 606.6766809167608 \cdot \color{blue}{z}\right)\right)\right)\right) \]

   6. Applied rewrites 98.8%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \color{blue}{\left(263.3831869810514 + z \cdot \left(436.8961725563396 + z \cdot \left(545.0353078428827 + 606.6766809167608 \cdot z\right)\right)\right)}\right) \]
3. Recombined 2 regimes into one program.
4. Add Preprocessing

Alternative 5: 97.8% accurate, 1.8× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ t_1 := t\_0 + 0.5\\ t_2 := \left(t\_0 + 7\right) + 0.5\\ t_3 := \frac{\pi}{\sin \left(\pi \cdot z\right)}\\ \mathbf{if}\;z \leq -0.4:\\ \;\;\;\;t\_3 \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {7.5}^{t\_1}\right) \cdot e^{-7.5}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;t\_3 \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {t\_2}^{t\_1}\right) \cdot e^{-t\_2}\right) \cdot \left(263.3831869810514 + 436.8961725563396 \cdot z\right)\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0))
        (t_1 (+ t_0 0.5))
        (t_2 (+ (+ t_0 7.0) 0.5))
        (t_3 (/ PI (sin (* PI z)))))
   (if (<= z -0.4)
     (*
      t_3
      (*
       (* (* (sqrt (* PI 2.0)) (pow 7.5 t_1)) (exp (- 7.5)))
       (- 0.9999999999998099 (/ 24.458333333348836 z))))
     (*
      t_3
      (*
       (* (* (* (sqrt PI) (sqrt 2.0)) (pow t_2 t_1)) (exp (- t_2)))
       (+ 263.3831869810514 (* 436.8961725563396 z)))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 0.5;
	double t_2 = (t_0 + 7.0) + 0.5;
	double t_3 = ((double) M_PI) / sin((((double) M_PI) * z));
	double tmp;
	if (z <= -0.4) {
		tmp = t_3 * (((sqrt((((double) M_PI) * 2.0)) * pow(7.5, t_1)) * exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	} else {
		tmp = t_3 * ((((sqrt(((double) M_PI)) * sqrt(2.0)) * pow(t_2, t_1)) * exp(-t_2)) * (263.3831869810514 + (436.8961725563396 * z)));
	}
	return tmp;
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = t_0 + 0.5;
	double t_2 = (t_0 + 7.0) + 0.5;
	double t_3 = Math.PI / Math.sin((Math.PI * z));
	double tmp;
	if (z <= -0.4) {
		tmp = t_3 * (((Math.sqrt((Math.PI * 2.0)) * Math.pow(7.5, t_1)) * Math.exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	} else {
		tmp = t_3 * ((((Math.sqrt(Math.PI) * Math.sqrt(2.0)) * Math.pow(t_2, t_1)) * Math.exp(-t_2)) * (263.3831869810514 + (436.8961725563396 * z)));
	}
	return tmp;
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	t_1 = t_0 + 0.5
	t_2 = (t_0 + 7.0) + 0.5
	t_3 = math.pi / math.sin((math.pi * z))
	tmp = 0
	if z <= -0.4:
		tmp = t_3 * (((math.sqrt((math.pi * 2.0)) * math.pow(7.5, t_1)) * math.exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)))
	else:
		tmp = t_3 * ((((math.sqrt(math.pi) * math.sqrt(2.0)) * math.pow(t_2, t_1)) * math.exp(-t_2)) * (263.3831869810514 + (436.8961725563396 * z)))
	return tmp

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	t_1 = Float64(t_0 + 0.5)
	t_2 = Float64(Float64(t_0 + 7.0) + 0.5)
	t_3 = Float64(pi / sin(Float64(pi * z)))
	tmp = 0.0
	if (z <= -0.4)
		tmp = Float64(t_3 * Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (7.5 ^ t_1)) * exp(Float64(-7.5))) * Float64(0.9999999999998099 - Float64(24.458333333348836 / z))));
	else
		tmp = Float64(t_3 * Float64(Float64(Float64(Float64(sqrt(pi) * sqrt(2.0)) * (t_2 ^ t_1)) * exp(Float64(-t_2))) * Float64(263.3831869810514 + Float64(436.8961725563396 * z))));
	end
	return tmp
end

MATLAB

function tmp_2 = code(z)
	t_0 = (1.0 - z) - 1.0;
	t_1 = t_0 + 0.5;
	t_2 = (t_0 + 7.0) + 0.5;
	t_3 = pi / sin((pi * z));
	tmp = 0.0;
	if (z <= -0.4)
		tmp = t_3 * (((sqrt((pi * 2.0)) * (7.5 ^ t_1)) * exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	else
		tmp = t_3 * ((((sqrt(pi) * sqrt(2.0)) * (t_2 ^ t_1)) * exp(-t_2)) * (263.3831869810514 + (436.8961725563396 * z)));
	end
	tmp_2 = tmp;
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, Block[{t$95$1 = N[(t$95$0 + 0.5), $MachinePrecision]}, Block[{t$95$2 = N[(N[(t$95$0 + 7.0), $MachinePrecision] + 0.5), $MachinePrecision]}, Block[{t$95$3 = N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -0.4], N[(t$95$3 * N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[7.5, t$95$1], $MachinePrecision]), $MachinePrecision] * N[Exp[(-7.5)], $MachinePrecision]), $MachinePrecision] * N[(0.9999999999998099 - N[(24.458333333348836 / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(t$95$3 * N[(N[(N[(N[(N[Sqrt[Pi], $MachinePrecision] * N[Sqrt[2.0], $MachinePrecision]), $MachinePrecision] * N[Power[t$95$2, t$95$1], $MachinePrecision]), $MachinePrecision] * N[Exp[(-t$95$2)], $MachinePrecision]), $MachinePrecision] * N[(263.3831869810514 + N[(436.8961725563396 * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]

Derivation

1. Split input into 2 regimes

2. if z < -0.40000000000000002

   1. Initial program 37.2%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. Taylor expanded in z around inf

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(\frac{9999999999998099}{10000000000000000} - \frac{611458333333720910362579}{25000000000000000000000} \cdot \frac{1}{z}\right)}\right) \]
   3. Step-by-step derivation

      1. lower--.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \color{blue}{\frac{611458333333720910362579}{25000000000000000000000} \cdot \frac{1}{z}}\right)\right) \]

      2. mult-flip-rev N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{\color{blue}{z}}\right)\right) \]

      3. lower-/.f64 13.9

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{\color{blue}{z}}\right)\right) \]

   4. Applied rewrites 13.9%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \color{blue}{\left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)}\right) \]

   5. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\color{blue}{\frac{15}{2}}}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{z}\right)\right) \]
   6. Step-by-step derivation

   7. Applied rewrites 10.6%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\color{blue}{7.5}}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right) \]

   8. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\frac{15}{2}}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\color{blue}{\frac{15}{2}}}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{z}\right)\right) \]
   9. Step-by-step derivation

   10. Applied rewrites 71.4%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {7.5}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\color{blue}{7.5}}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right) \]

   if -0.40000000000000002 < z

   1. Initial program 97.4%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   2. Step-by-step derivation

      1. lift-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\sqrt{\pi \cdot 2}} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\color{blue}{\mathsf{PI}\left(\right)} \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      3. lift-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\color{blue}{\mathsf{PI}\left(\right) \cdot 2}} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      4. sqrt-prod N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      5. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      6. lower-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\color{blue}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      7. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\color{blue}{\pi}} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(\frac{9999999999998099}{10000000000000000} + \frac{\frac{6765203681218851}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{\frac{-3147848041806007}{2500000000000}}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{\frac{7713234287776531}{10000000000000}}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{\frac{-883075145810703}{5000000000000}}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{\frac{2501468655737381}{200000000000000}}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      8. lower-sqrt.f64 97.6

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \color{blue}{\sqrt{2}}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. Applied rewrites 97.6%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\color{blue}{\left(\sqrt{\pi} \cdot \sqrt{2}\right)} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(\frac{1106209385320415913103082059}{4200000000000000000000000} + \frac{102757979785251069442117317613}{235200000000000000000000000} \cdot z\right)}\right) \]
   5. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + \color{blue}{\frac{102757979785251069442117317613}{235200000000000000000000000} \cdot z}\right)\right) \]

      2. lower-*.f64 98.3

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(263.3831869810514 + 436.8961725563396 \cdot \color{blue}{z}\right)\right) \]

   6. Applied rewrites 98.3%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\left(\sqrt{\pi} \cdot \sqrt{2}\right) \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \color{blue}{\left(263.3831869810514 + 436.8961725563396 \cdot z\right)}\right) \]
3. Recombined 2 regimes into one program.
4. Add Preprocessing

Alternative 6: 97.7% accurate, 1.9× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ t_1 := \frac{\pi}{\sin \left(\pi \cdot z\right)}\\ \mathbf{if}\;z \leq -0.6:\\ \;\;\;\;t\_1 \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {7.5}^{\left(t\_0 + 0.5\right)}\right) \cdot e^{-7.5}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;t\_1 \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(t\_0 + 7\right) + 0.5\right)}\right) \cdot \left(263.3831869810514 + z \cdot \left(436.8961725563396 + z \cdot \left(545.0353078428827 - -606.6766809167608 \cdot z\right)\right)\right)\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0)) (t_1 (/ PI (sin (* PI z)))))
   (if (<= z -0.6)
     (*
      t_1
      (*
       (* (* (sqrt (* PI 2.0)) (pow 7.5 (+ t_0 0.5))) (exp (- 7.5)))
       (- 0.9999999999998099 (/ 24.458333333348836 z))))
     (*
      t_1
      (*
       (*
        (* (sqrt PI) (* (pow (- 7.5 z) (- 0.5 z)) (sqrt 2.0)))
        (exp (- (+ (+ t_0 7.0) 0.5))))
       (+
        263.3831869810514
        (*
         z
         (+
          436.8961725563396
          (* z (- 545.0353078428827 (* -606.6766809167608 z)))))))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = ((double) M_PI) / sin((((double) M_PI) * z));
	double tmp;
	if (z <= -0.6) {
		tmp = t_1 * (((sqrt((((double) M_PI) * 2.0)) * pow(7.5, (t_0 + 0.5))) * exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	} else {
		tmp = t_1 * (((sqrt(((double) M_PI)) * (pow((7.5 - z), (0.5 - z)) * sqrt(2.0))) * exp(-((t_0 + 7.0) + 0.5))) * (263.3831869810514 + (z * (436.8961725563396 + (z * (545.0353078428827 - (-606.6766809167608 * z)))))));
	}
	return tmp;
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	double t_1 = Math.PI / Math.sin((Math.PI * z));
	double tmp;
	if (z <= -0.6) {
		tmp = t_1 * (((Math.sqrt((Math.PI * 2.0)) * Math.pow(7.5, (t_0 + 0.5))) * Math.exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	} else {
		tmp = t_1 * (((Math.sqrt(Math.PI) * (Math.pow((7.5 - z), (0.5 - z)) * Math.sqrt(2.0))) * Math.exp(-((t_0 + 7.0) + 0.5))) * (263.3831869810514 + (z * (436.8961725563396 + (z * (545.0353078428827 - (-606.6766809167608 * z)))))));
	}
	return tmp;
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	t_1 = math.pi / math.sin((math.pi * z))
	tmp = 0
	if z <= -0.6:
		tmp = t_1 * (((math.sqrt((math.pi * 2.0)) * math.pow(7.5, (t_0 + 0.5))) * math.exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)))
	else:
		tmp = t_1 * (((math.sqrt(math.pi) * (math.pow((7.5 - z), (0.5 - z)) * math.sqrt(2.0))) * math.exp(-((t_0 + 7.0) + 0.5))) * (263.3831869810514 + (z * (436.8961725563396 + (z * (545.0353078428827 - (-606.6766809167608 * z)))))))
	return tmp

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	t_1 = Float64(pi / sin(Float64(pi * z)))
	tmp = 0.0
	if (z <= -0.6)
		tmp = Float64(t_1 * Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (7.5 ^ Float64(t_0 + 0.5))) * exp(Float64(-7.5))) * Float64(0.9999999999998099 - Float64(24.458333333348836 / z))));
	else
		tmp = Float64(t_1 * Float64(Float64(Float64(sqrt(pi) * Float64((Float64(7.5 - z) ^ Float64(0.5 - z)) * sqrt(2.0))) * exp(Float64(-Float64(Float64(t_0 + 7.0) + 0.5)))) * Float64(263.3831869810514 + Float64(z * Float64(436.8961725563396 + Float64(z * Float64(545.0353078428827 - Float64(-606.6766809167608 * z))))))));
	end
	return tmp
end

MATLAB

function tmp_2 = code(z)
	t_0 = (1.0 - z) - 1.0;
	t_1 = pi / sin((pi * z));
	tmp = 0.0;
	if (z <= -0.6)
		tmp = t_1 * (((sqrt((pi * 2.0)) * (7.5 ^ (t_0 + 0.5))) * exp(-7.5)) * (0.9999999999998099 - (24.458333333348836 / z)));
	else
		tmp = t_1 * (((sqrt(pi) * (((7.5 - z) ^ (0.5 - z)) * sqrt(2.0))) * exp(-((t_0 + 7.0) + 0.5))) * (263.3831869810514 + (z * (436.8961725563396 + (z * (545.0353078428827 - (-606.6766809167608 * z)))))));
	end
	tmp_2 = tmp;
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, Block[{t$95$1 = N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -0.6], N[(t$95$1 * N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[7.5, N[(t$95$0 + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Exp[(-7.5)], $MachinePrecision]), $MachinePrecision] * N[(0.9999999999998099 - N[(24.458333333348836 / z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(t$95$1 * N[(N[(N[(N[Sqrt[Pi], $MachinePrecision] * N[(N[Power[N[(7.5 - z), $MachinePrecision], N[(0.5 - z), $MachinePrecision]], $MachinePrecision] * N[Sqrt[2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[Exp[(-N[(N[(t$95$0 + 7.0), $MachinePrecision] + 0.5), $MachinePrecision])], $MachinePrecision]), $MachinePrecision] * N[(263.3831869810514 + N[(z * N[(436.8961725563396 + N[(z * N[(545.0353078428827 - N[(-606.6766809167608 * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]

Derivation

1. Split input into 2 regimes

2. if z < -0.599999999999999978

   1. Initial program 36.6%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. Taylor expanded in z around inf

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(\frac{9999999999998099}{10000000000000000} - \frac{611458333333720910362579}{25000000000000000000000} \cdot \frac{1}{z}\right)}\right) \]
   3. Step-by-step derivation

      1. lower--.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \color{blue}{\frac{611458333333720910362579}{25000000000000000000000} \cdot \frac{1}{z}}\right)\right) \]

      2. mult-flip-rev N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{\color{blue}{z}}\right)\right) \]

      3. lower-/.f64 13.9

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{\color{blue}{z}}\right)\right) \]

   4. Applied rewrites 13.9%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \color{blue}{\left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)}\right) \]

   5. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\color{blue}{\frac{15}{2}}}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{z}\right)\right) \]
   6. Step-by-step derivation

   7. Applied rewrites 10.5%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\color{blue}{7.5}}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right) \]

   8. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\frac{15}{2}}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\color{blue}{\frac{15}{2}}}\right) \cdot \left(\frac{9999999999998099}{10000000000000000} - \frac{\frac{611458333333720910362579}{25000000000000000000000}}{z}\right)\right) \]
   9. Step-by-step derivation

   10. Applied rewrites 71.8%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {7.5}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\color{blue}{7.5}}\right) \cdot \left(0.9999999999998099 - \frac{24.458333333348836}{z}\right)\right) \]

   if -0.599999999999999978 < z

   1. Initial program 97.4%

      \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right)} + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   3. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \color{blue}{\frac{39321001939258358983}{90000000000000000} \cdot z}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lower-*.f64 97.4

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot \color{blue}{z}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. Applied rewrites 97.4%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(263.4062807184368 + 436.9000215473151 \cdot z\right)} + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   5. Taylor expanded in z around inf

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right)} \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
   6. Step-by-step derivation

      1. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \color{blue}{\left(e^{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      2. lift-sqrt.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(\color{blue}{e^{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)}} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      3. lift-PI.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left(e^{\color{blue}{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)}} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      4. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left(e^{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)} \cdot \color{blue}{\sqrt{2}}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      5. exp-to-pow N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{\color{blue}{2}}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      6. lower-pow.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{\color{blue}{2}}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      7. lower--.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      8. lower--.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

      9. lower-sqrt.f64 97.5

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   7. Applied rewrites 97.5%

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\color{blue}{\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right)} \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   8. Taylor expanded in z around 0

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)\right)\right)}\right) \]
   9. Step-by-step derivation

      1. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + \color{blue}{z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)\right)}\right)\right) \]

      2. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \color{blue}{\left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)\right)}\right)\right) \]

      3. lower-+.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + \color{blue}{z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)}\right)\right)\right) \]

      4. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \color{blue}{\left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} + \frac{4027292589444183035165374538123333}{6638284800000000000000000000000} \cdot z\right)}\right)\right)\right) \]

      5. fp-cancel-sign-sub-inv N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} - \color{blue}{\left(\mathsf{neg}\left(\frac{4027292589444183035165374538123333}{6638284800000000000000000000000}\right)\right) \cdot z}\right)\right)\right)\right) \]

      6. lower--.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} - \color{blue}{\left(\mathsf{neg}\left(\frac{4027292589444183035165374538123333}{6638284800000000000000000000000}\right)\right) \cdot z}\right)\right)\right)\right) \]

      7. lower-*.f64 N/A

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} + z \cdot \left(\frac{102757979785251069442117317613}{235200000000000000000000000} + z \cdot \left(\frac{64608921419941589693928044520019}{118540800000000000000000000000} - \left(\mathsf{neg}\left(\frac{4027292589444183035165374538123333}{6638284800000000000000000000000}\right)\right) \cdot \color{blue}{z}\right)\right)\right)\right) \]

      8. metadata-eval 98.0

         \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(263.3831869810514 + z \cdot \left(436.8961725563396 + z \cdot \left(545.0353078428827 - -606.6766809167608 \cdot z\right)\right)\right)\right) \]

   10. Applied rewrites 98.0%

       \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \color{blue}{\left(263.3831869810514 + z \cdot \left(436.8961725563396 + z \cdot \left(545.0353078428827 - -606.6766809167608 \cdot z\right)\right)\right)}\right) \]
3. Recombined 2 regimes into one program.
4. Add Preprocessing

Alternative 7: 96.6% accurate, 1.9× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ \frac{1 + 0.16666666666666666 \cdot \left(\left(z \cdot z\right) \cdot \left(\pi \cdot \pi\right)\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(t\_0 + 7\right) + 0.5\right)}^{\left(t\_0 + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{t\_0 + 8}\right)\right) \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0)))
   (*
    (/ (+ 1.0 (* 0.16666666666666666 (* (* z z) (* PI PI)))) z)
    (*
     (*
      (* (sqrt (* PI 2.0)) (pow (+ (+ t_0 7.0) 0.5) (+ t_0 0.5)))
      (+ (exp -7.5) (* z (exp -7.5))))
     (+
      (+ 263.383186962231 (* z (- 436.896172553987 (* -545.0353078425886 z))))
      (/ 1.5056327351493116e-7 (+ t_0 8.0)))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	return ((1.0 + (0.16666666666666666 * ((z * z) * (((double) M_PI) * ((double) M_PI))))) / z) * (((sqrt((((double) M_PI) * 2.0)) * pow(((t_0 + 7.0) + 0.5), (t_0 + 0.5))) * (exp(-7.5) + (z * exp(-7.5)))) * ((263.383186962231 + (z * (436.896172553987 - (-545.0353078425886 * z)))) + (1.5056327351493116e-7 / (t_0 + 8.0))));
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	return ((1.0 + (0.16666666666666666 * ((z * z) * (Math.PI * Math.PI)))) / z) * (((Math.sqrt((Math.PI * 2.0)) * Math.pow(((t_0 + 7.0) + 0.5), (t_0 + 0.5))) * (Math.exp(-7.5) + (z * Math.exp(-7.5)))) * ((263.383186962231 + (z * (436.896172553987 - (-545.0353078425886 * z)))) + (1.5056327351493116e-7 / (t_0 + 8.0))));
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	return ((1.0 + (0.16666666666666666 * ((z * z) * (math.pi * math.pi)))) / z) * (((math.sqrt((math.pi * 2.0)) * math.pow(((t_0 + 7.0) + 0.5), (t_0 + 0.5))) * (math.exp(-7.5) + (z * math.exp(-7.5)))) * ((263.383186962231 + (z * (436.896172553987 - (-545.0353078425886 * z)))) + (1.5056327351493116e-7 / (t_0 + 8.0))))

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	return Float64(Float64(Float64(1.0 + Float64(0.16666666666666666 * Float64(Float64(z * z) * Float64(pi * pi)))) / z) * Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (Float64(Float64(t_0 + 7.0) + 0.5) ^ Float64(t_0 + 0.5))) * Float64(exp(-7.5) + Float64(z * exp(-7.5)))) * Float64(Float64(263.383186962231 + Float64(z * Float64(436.896172553987 - Float64(-545.0353078425886 * z)))) + Float64(1.5056327351493116e-7 / Float64(t_0 + 8.0)))))
end

MATLAB

function tmp = code(z)
	t_0 = (1.0 - z) - 1.0;
	tmp = ((1.0 + (0.16666666666666666 * ((z * z) * (pi * pi)))) / z) * (((sqrt((pi * 2.0)) * (((t_0 + 7.0) + 0.5) ^ (t_0 + 0.5))) * (exp(-7.5) + (z * exp(-7.5)))) * ((263.383186962231 + (z * (436.896172553987 - (-545.0353078425886 * z)))) + (1.5056327351493116e-7 / (t_0 + 8.0))));
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, N[(N[(N[(1.0 + N[(0.16666666666666666 * N[(N[(z * z), $MachinePrecision] * N[(Pi * Pi), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / z), $MachinePrecision] * N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[N[(N[(t$95$0 + 7.0), $MachinePrecision] + 0.5), $MachinePrecision], N[(t$95$0 + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[(N[Exp[-7.5], $MachinePrecision] + N[(z * N[Exp[-7.5], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(263.383186962231 + N[(z * N[(436.896172553987 - N[(-545.0353078425886 * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(t$95$0 + 8.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Initial program 96.5%

   \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

2. Taylor expanded in z around 0

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right)} + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
3. Step-by-step derivation

   1. lower-+.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \color{blue}{\frac{39321001939258358983}{90000000000000000} \cdot z}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. lower-*.f64 96.1

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot \color{blue}{z}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

4. Applied rewrites 96.1%

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(263.4062807184368 + 436.9000215473151 \cdot z\right)} + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

5. Taylor expanded in z around 0

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
6. Step-by-step derivation

   1. lower-+.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + \color{blue}{z \cdot e^{\frac{-15}{2}}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. lift-exp.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + \color{blue}{z} \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. lower-*.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot \color{blue}{e^{\frac{-15}{2}}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. lift-exp.f64 97.1

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

7. Applied rewrites 97.1%

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \color{blue}{\left(e^{-7.5} + z \cdot e^{-7.5}\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

8. Taylor expanded in z around 0

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\color{blue}{\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} + \frac{1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right)} + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
9. Step-by-step derivation

   1. lower-+.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + \color{blue}{z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} + \frac{1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. lower-*.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \color{blue}{\left(\frac{16055934341359023345617179}{36750000000000000000000} + \frac{1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. fp-cancel-sign-sub-inv N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \color{blue}{\left(\mathsf{neg}\left(\frac{1261892996482553330703662111}{2315250000000000000000000}\right)\right) \cdot z}\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. lower--.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \color{blue}{\left(\mathsf{neg}\left(\frac{1261892996482553330703662111}{2315250000000000000000000}\right)\right) \cdot z}\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   5. lower-*.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \left(\mathsf{neg}\left(\frac{1261892996482553330703662111}{2315250000000000000000000}\right)\right) \cdot \color{blue}{z}\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   6. metadata-eval 96.2

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

10. Applied rewrites 96.2%

    \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\color{blue}{\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right)} + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

11. Taylor expanded in z around 0

    \[\leadsto \color{blue}{\frac{1 + \frac{1}{6} \cdot \left({z}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)}{z}} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
12. Step-by-step derivation

    1. lower-/.f64 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left({z}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)}{\color{blue}{z}} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    2. lower-+.f64 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left({z}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    3. lower-*.f64 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left({z}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    4. lower-*.f64 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left({z}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    5. unpow2 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left(\left(z \cdot z\right) \cdot {\mathsf{PI}\left(\right)}^{2}\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    6. lower-*.f64 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left(\left(z \cdot z\right) \cdot {\mathsf{PI}\left(\right)}^{2}\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    7. pow2 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left(\left(z \cdot z\right) \cdot \left(\mathsf{PI}\left(\right) \cdot \mathsf{PI}\left(\right)\right)\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    8. lower-*.f64 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left(\left(z \cdot z\right) \cdot \left(\mathsf{PI}\left(\right) \cdot \mathsf{PI}\left(\right)\right)\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    9. lift-PI.f64 N/A

       \[\leadsto \frac{1 + \frac{1}{6} \cdot \left(\left(z \cdot z\right) \cdot \left(\pi \cdot \mathsf{PI}\left(\right)\right)\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

    10. lift-PI.f64 96.6

        \[\leadsto \frac{1 + 0.16666666666666666 \cdot \left(\left(z \cdot z\right) \cdot \left(\pi \cdot \pi\right)\right)}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

13. Applied rewrites 96.6%

    \[\leadsto \color{blue}{\frac{1 + 0.16666666666666666 \cdot \left(\left(z \cdot z\right) \cdot \left(\pi \cdot \pi\right)\right)}{z}} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
14. Add Preprocessing

Alternative 8: 96.5% accurate, 2.1× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - z\right) - 1\\ \frac{1}{z} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(t\_0 + 7\right) + 0.5\right)}^{\left(t\_0 + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{t\_0 + 8}\right)\right) \end{array} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (let* ((t_0 (- (- 1.0 z) 1.0)))
   (*
    (/ 1.0 z)
    (*
     (*
      (* (sqrt (* PI 2.0)) (pow (+ (+ t_0 7.0) 0.5) (+ t_0 0.5)))
      (+ (exp -7.5) (* z (exp -7.5))))
     (+
      (+ 263.383186962231 (* z (- 436.896172553987 (* -545.0353078425886 z))))
      (/ 1.5056327351493116e-7 (+ t_0 8.0)))))))

C

double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	return (1.0 / z) * (((sqrt((((double) M_PI) * 2.0)) * pow(((t_0 + 7.0) + 0.5), (t_0 + 0.5))) * (exp(-7.5) + (z * exp(-7.5)))) * ((263.383186962231 + (z * (436.896172553987 - (-545.0353078425886 * z)))) + (1.5056327351493116e-7 / (t_0 + 8.0))));
}

Java

public static double code(double z) {
	double t_0 = (1.0 - z) - 1.0;
	return (1.0 / z) * (((Math.sqrt((Math.PI * 2.0)) * Math.pow(((t_0 + 7.0) + 0.5), (t_0 + 0.5))) * (Math.exp(-7.5) + (z * Math.exp(-7.5)))) * ((263.383186962231 + (z * (436.896172553987 - (-545.0353078425886 * z)))) + (1.5056327351493116e-7 / (t_0 + 8.0))));
}

Python

def code(z):
	t_0 = (1.0 - z) - 1.0
	return (1.0 / z) * (((math.sqrt((math.pi * 2.0)) * math.pow(((t_0 + 7.0) + 0.5), (t_0 + 0.5))) * (math.exp(-7.5) + (z * math.exp(-7.5)))) * ((263.383186962231 + (z * (436.896172553987 - (-545.0353078425886 * z)))) + (1.5056327351493116e-7 / (t_0 + 8.0))))

Julia

function code(z)
	t_0 = Float64(Float64(1.0 - z) - 1.0)
	return Float64(Float64(1.0 / z) * Float64(Float64(Float64(sqrt(Float64(pi * 2.0)) * (Float64(Float64(t_0 + 7.0) + 0.5) ^ Float64(t_0 + 0.5))) * Float64(exp(-7.5) + Float64(z * exp(-7.5)))) * Float64(Float64(263.383186962231 + Float64(z * Float64(436.896172553987 - Float64(-545.0353078425886 * z)))) + Float64(1.5056327351493116e-7 / Float64(t_0 + 8.0)))))
end

MATLAB

function tmp = code(z)
	t_0 = (1.0 - z) - 1.0;
	tmp = (1.0 / z) * (((sqrt((pi * 2.0)) * (((t_0 + 7.0) + 0.5) ^ (t_0 + 0.5))) * (exp(-7.5) + (z * exp(-7.5)))) * ((263.383186962231 + (z * (436.896172553987 - (-545.0353078425886 * z)))) + (1.5056327351493116e-7 / (t_0 + 8.0))));
end

Wolfram

code[z_] := Block[{t$95$0 = N[(N[(1.0 - z), $MachinePrecision] - 1.0), $MachinePrecision]}, N[(N[(1.0 / z), $MachinePrecision] * N[(N[(N[(N[Sqrt[N[(Pi * 2.0), $MachinePrecision]], $MachinePrecision] * N[Power[N[(N[(t$95$0 + 7.0), $MachinePrecision] + 0.5), $MachinePrecision], N[(t$95$0 + 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[(N[Exp[-7.5], $MachinePrecision] + N[(z * N[Exp[-7.5], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(N[(263.383186962231 + N[(z * N[(436.896172553987 - N[(-545.0353078425886 * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(1.5056327351493116e-7 / N[(t$95$0 + 8.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Initial program 96.5%

   \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

2. Taylor expanded in z around 0

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right)} + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
3. Step-by-step derivation

   1. lower-+.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \color{blue}{\frac{39321001939258358983}{90000000000000000} \cdot z}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. lower-*.f64 96.1

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot \color{blue}{z}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

4. Applied rewrites 96.1%

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(263.4062807184368 + 436.9000215473151 \cdot z\right)} + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

5. Taylor expanded in z around 0

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
6. Step-by-step derivation

   1. lower-+.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + \color{blue}{z \cdot e^{\frac{-15}{2}}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. lift-exp.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + \color{blue}{z} \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. lower-*.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot \color{blue}{e^{\frac{-15}{2}}}\right)\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. lift-exp.f64 97.1

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

7. Applied rewrites 97.1%

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \color{blue}{\left(e^{-7.5} + z \cdot e^{-7.5}\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

8. Taylor expanded in z around 0

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\color{blue}{\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} + \frac{1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right)} + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
9. Step-by-step derivation

   1. lower-+.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + \color{blue}{z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} + \frac{1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. lower-*.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \color{blue}{\left(\frac{16055934341359023345617179}{36750000000000000000000} + \frac{1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. fp-cancel-sign-sub-inv N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \color{blue}{\left(\mathsf{neg}\left(\frac{1261892996482553330703662111}{2315250000000000000000000}\right)\right) \cdot z}\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. lower--.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \color{blue}{\left(\mathsf{neg}\left(\frac{1261892996482553330703662111}{2315250000000000000000000}\right)\right) \cdot z}\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   5. lower-*.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \left(\mathsf{neg}\left(\frac{1261892996482553330703662111}{2315250000000000000000000}\right)\right) \cdot \color{blue}{z}\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   6. metadata-eval 96.2

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

10. Applied rewrites 96.2%

    \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\color{blue}{\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right)} + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

11. Taylor expanded in z around 0

    \[\leadsto \color{blue}{\frac{1}{z}} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot \left(e^{\frac{-15}{2}} + z \cdot e^{\frac{-15}{2}}\right)\right) \cdot \left(\left(\frac{1382761731551712743134679}{5250000000000000000000} + z \cdot \left(\frac{16055934341359023345617179}{36750000000000000000000} - \frac{-1261892996482553330703662111}{2315250000000000000000000} \cdot z\right)\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
12. Step-by-step derivation

    1. lower-/.f64 96.5

       \[\leadsto \frac{1}{\color{blue}{z}} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

13. Applied rewrites 96.5%

    \[\leadsto \color{blue}{\frac{1}{z}} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot \left(e^{-7.5} + z \cdot e^{-7.5}\right)\right) \cdot \left(\left(263.383186962231 + z \cdot \left(436.896172553987 - -545.0353078425886 \cdot z\right)\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
14. Add Preprocessing

Alternative 9: 96.0% accurate, 2.5× speedup

Math

\[\begin{array}{l} \\ \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-7.5}\right) \cdot 263.3831869810514\right) \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (*
  (/ PI (sin (* PI z)))
  (*
   (* (* (sqrt PI) (* (pow (- 7.5 z) (- 0.5 z)) (sqrt 2.0))) (exp -7.5))
   263.3831869810514)))

C

double code(double z) {
	return (((double) M_PI) / sin((((double) M_PI) * z))) * (((sqrt(((double) M_PI)) * (pow((7.5 - z), (0.5 - z)) * sqrt(2.0))) * exp(-7.5)) * 263.3831869810514);
}

Java

public static double code(double z) {
	return (Math.PI / Math.sin((Math.PI * z))) * (((Math.sqrt(Math.PI) * (Math.pow((7.5 - z), (0.5 - z)) * Math.sqrt(2.0))) * Math.exp(-7.5)) * 263.3831869810514);
}

Python

def code(z):
	return (math.pi / math.sin((math.pi * z))) * (((math.sqrt(math.pi) * (math.pow((7.5 - z), (0.5 - z)) * math.sqrt(2.0))) * math.exp(-7.5)) * 263.3831869810514)

Julia

function code(z)
	return Float64(Float64(pi / sin(Float64(pi * z))) * Float64(Float64(Float64(sqrt(pi) * Float64((Float64(7.5 - z) ^ Float64(0.5 - z)) * sqrt(2.0))) * exp(-7.5)) * 263.3831869810514))
end

MATLAB

function tmp = code(z)
	tmp = (pi / sin((pi * z))) * (((sqrt(pi) * (((7.5 - z) ^ (0.5 - z)) * sqrt(2.0))) * exp(-7.5)) * 263.3831869810514);
end

Wolfram

code[z_] := N[(N[(Pi / N[Sin[N[(Pi * z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[(N[(N[(N[Sqrt[Pi], $MachinePrecision] * N[(N[Power[N[(7.5 - z), $MachinePrecision], N[(0.5 - z), $MachinePrecision]], $MachinePrecision] * N[Sqrt[2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[Exp[-7.5], $MachinePrecision]), $MachinePrecision] * 263.3831869810514), $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 96.5%

   \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

2. Taylor expanded in z around 0

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right)} + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
3. Step-by-step derivation

   1. lower-+.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}^{\left(\left(\left(1 - z\right) - 1\right) + \frac{1}{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \color{blue}{\frac{39321001939258358983}{90000000000000000} \cdot z}\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. lower-*.f64 96.1

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot \color{blue}{z}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

4. Applied rewrites 96.1%

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\color{blue}{\left(263.4062807184368 + 436.9000215473151 \cdot z\right)} + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

5. Taylor expanded in z around inf

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\color{blue}{\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right)} \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]
6. Step-by-step derivation

   1. lower-*.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \color{blue}{\left(e^{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   2. lift-sqrt.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(\color{blue}{e^{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)}} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   3. lift-PI.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left(e^{\color{blue}{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)}} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   4. lower-*.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left(e^{\log \left(\frac{15}{2} - z\right) \cdot \left(\frac{1}{2} - z\right)} \cdot \color{blue}{\sqrt{2}}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   5. exp-to-pow N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{\color{blue}{2}}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   6. lower-pow.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{\color{blue}{2}}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   7. lower--.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   8. lower--.f64 N/A

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \left(\left(\left(\left(\frac{7902188421553103227}{30000000000000000} + \frac{39321001939258358983}{90000000000000000} \cdot z\right) + \frac{\frac{-3464277381643003}{25000000000000000}}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{\frac{2496092394504893}{250000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{\frac{3764081837873279}{25000000000000000000000}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

   9. lower-sqrt.f64 96.1

      \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

7. Applied rewrites 96.1%

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\color{blue}{\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right)} \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(263.4062807184368 + 436.9000215473151 \cdot z\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

8. Taylor expanded in z around 0

   \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + \frac{1}{2}\right)}\right) \cdot \color{blue}{\frac{1106209385320415913103082059}{4200000000000000000000000}}\right) \]
9. Step-by-step derivation

10. Applied rewrites 95.2%

    \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \color{blue}{263.3831869810514}\right) \]

11. Taylor expanded in z around 0

    \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(\frac{15}{2} - z\right)}^{\left(\frac{1}{2} - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{\color{blue}{\frac{-15}{2}}}\right) \cdot \frac{1106209385320415913103082059}{4200000000000000000000000}\right) \]
12. Step-by-step derivation

13. Applied rewrites 96.0%

    \[\leadsto \frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi} \cdot \left({\left(7.5 - z\right)}^{\left(0.5 - z\right)} \cdot \sqrt{2}\right)\right) \cdot e^{\color{blue}{-7.5}}\right) \cdot 263.3831869810514\right) \]
14. Add Preprocessing

Alternative 10: 95.9% accurate, 6.8× speedup

Math

\[\begin{array}{l} \\ 263.3831869810514 \cdot \left(\frac{1}{z \cdot \frac{1}{e^{-7.5} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (*
  263.3831869810514
  (* (/ 1.0 (* z (/ 1.0 (* (exp -7.5) (sqrt 15.0))))) (sqrt PI))))

C

double code(double z) {
	return 263.3831869810514 * ((1.0 / (z * (1.0 / (exp(-7.5) * sqrt(15.0))))) * sqrt(((double) M_PI)));
}

Java

public static double code(double z) {
	return 263.3831869810514 * ((1.0 / (z * (1.0 / (Math.exp(-7.5) * Math.sqrt(15.0))))) * Math.sqrt(Math.PI));
}

Python

def code(z):
	return 263.3831869810514 * ((1.0 / (z * (1.0 / (math.exp(-7.5) * math.sqrt(15.0))))) * math.sqrt(math.pi))

Julia

function code(z)
	return Float64(263.3831869810514 * Float64(Float64(1.0 / Float64(z * Float64(1.0 / Float64(exp(-7.5) * sqrt(15.0))))) * sqrt(pi)))
end

MATLAB

function tmp = code(z)
	tmp = 263.3831869810514 * ((1.0 / (z * (1.0 / (exp(-7.5) * sqrt(15.0))))) * sqrt(pi));
end

Wolfram

code[z_] := N[(263.3831869810514 * N[(N[(1.0 / N[(z * N[(1.0 / N[(N[Exp[-7.5], $MachinePrecision] * N[Sqrt[15.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[Sqrt[Pi], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 96.5%

   \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

2. Taylor expanded in z around 0

   \[\leadsto \color{blue}{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \sqrt{\mathsf{PI}\left(\right)}\right)} \]
3. Step-by-step derivation

   1. lower-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \color{blue}{\left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \sqrt{\mathsf{PI}\left(\right)}\right)} \]

   2. lower-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \color{blue}{\sqrt{\mathsf{PI}\left(\right)}}\right) \]

4. Applied rewrites 95.7%

   \[\leadsto \color{blue}{263.3831869810514 \cdot \left(\frac{e^{-7.5} \cdot \sqrt{15}}{z} \cdot \sqrt{\pi}\right)} \]
5. Step-by-step derivation

   1. lift-/.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{e^{\frac{-15}{2}} \cdot \sqrt{15}}{z} \cdot \sqrt{\color{blue}{\pi}}\right) \]

   2. division-flip N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\color{blue}{\pi}}\right) \]

   3. lift-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   4. lift-exp.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   5. lift-sqrt.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   6. metadata-eval N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{2 \cdot \frac{15}{2}}}} \cdot \sqrt{\pi}\right) \]

   7. sqrt-unprod N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\pi}\right) \]

   8. lower-/.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\color{blue}{\pi}}\right) \]

   9. lower-/.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\pi}\right) \]

   10. lift-exp.f64 N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\pi}\right) \]

   11. sqrt-unprod N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{2 \cdot \frac{15}{2}}}} \cdot \sqrt{\pi}\right) \]

   12. metadata-eval N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   13. lift-sqrt.f64 N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   14. lift-*.f64 95.6

       \[\leadsto 263.3831869810514 \cdot \left(\frac{1}{\frac{z}{e^{-7.5} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

6. Applied rewrites 95.6%

   \[\leadsto 263.3831869810514 \cdot \left(\frac{1}{\frac{z}{e^{-7.5} \cdot \sqrt{15}}} \cdot \sqrt{\color{blue}{\pi}}\right) \]
7. Step-by-step derivation

   1. lift-/.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   2. mult-flip N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   3. lower-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   4. lift-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   5. lift-exp.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   6. lift-sqrt.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   7. metadata-eval N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{2 \cdot \frac{15}{2}}}} \cdot \sqrt{\pi}\right) \]

   8. sqrt-unprod N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\pi}\right) \]

   9. lower-/.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\pi}\right) \]

   10. sqrt-unprod N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{2 \cdot \frac{15}{2}}}} \cdot \sqrt{\pi}\right) \]

   11. metadata-eval N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   12. lift-exp.f64 N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   13. lift-sqrt.f64 N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{z \cdot \frac{1}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   14. lift-*.f64 95.9

       \[\leadsto 263.3831869810514 \cdot \left(\frac{1}{z \cdot \frac{1}{e^{-7.5} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

8. Applied rewrites 95.9%

   \[\leadsto 263.3831869810514 \cdot \left(\frac{1}{z \cdot \frac{1}{e^{-7.5} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]
9. Add Preprocessing

Alternative 11: 95.7% accurate, 7.4× speedup

Math

\[\begin{array}{l} \\ 263.3831869810514 \cdot \left(\frac{1}{\frac{z}{e^{-7.5} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (* 263.3831869810514 (* (/ 1.0 (/ z (* (exp -7.5) (sqrt 15.0)))) (sqrt PI))))

C

double code(double z) {
	return 263.3831869810514 * ((1.0 / (z / (exp(-7.5) * sqrt(15.0)))) * sqrt(((double) M_PI)));
}

Java

public static double code(double z) {
	return 263.3831869810514 * ((1.0 / (z / (Math.exp(-7.5) * Math.sqrt(15.0)))) * Math.sqrt(Math.PI));
}

Python

def code(z):
	return 263.3831869810514 * ((1.0 / (z / (math.exp(-7.5) * math.sqrt(15.0)))) * math.sqrt(math.pi))

Julia

function code(z)
	return Float64(263.3831869810514 * Float64(Float64(1.0 / Float64(z / Float64(exp(-7.5) * sqrt(15.0)))) * sqrt(pi)))
end

MATLAB

function tmp = code(z)
	tmp = 263.3831869810514 * ((1.0 / (z / (exp(-7.5) * sqrt(15.0)))) * sqrt(pi));
end

Wolfram

code[z_] := N[(263.3831869810514 * N[(N[(1.0 / N[(z / N[(N[Exp[-7.5], $MachinePrecision] * N[Sqrt[15.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[Sqrt[Pi], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 96.5%

   \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

2. Taylor expanded in z around 0

   \[\leadsto \color{blue}{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \sqrt{\mathsf{PI}\left(\right)}\right)} \]
3. Step-by-step derivation

   1. lower-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \color{blue}{\left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \sqrt{\mathsf{PI}\left(\right)}\right)} \]

   2. lower-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \color{blue}{\sqrt{\mathsf{PI}\left(\right)}}\right) \]

4. Applied rewrites 95.7%

   \[\leadsto \color{blue}{263.3831869810514 \cdot \left(\frac{e^{-7.5} \cdot \sqrt{15}}{z} \cdot \sqrt{\pi}\right)} \]
5. Step-by-step derivation

   1. lift-/.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{e^{\frac{-15}{2}} \cdot \sqrt{15}}{z} \cdot \sqrt{\color{blue}{\pi}}\right) \]

   2. division-flip N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\color{blue}{\pi}}\right) \]

   3. lift-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   4. lift-exp.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   5. lift-sqrt.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   6. metadata-eval N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{2 \cdot \frac{15}{2}}}} \cdot \sqrt{\pi}\right) \]

   7. sqrt-unprod N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\pi}\right) \]

   8. lower-/.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\color{blue}{\pi}}\right) \]

   9. lower-/.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\pi}\right) \]

   10. lift-exp.f64 N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}} \cdot \sqrt{\pi}\right) \]

   11. sqrt-unprod N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{2 \cdot \frac{15}{2}}}} \cdot \sqrt{\pi}\right) \]

   12. metadata-eval N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   13. lift-sqrt.f64 N/A

       \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{1}{\frac{z}{e^{\frac{-15}{2}} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

   14. lift-*.f64 95.6

       \[\leadsto 263.3831869810514 \cdot \left(\frac{1}{\frac{z}{e^{-7.5} \cdot \sqrt{15}}} \cdot \sqrt{\pi}\right) \]

6. Applied rewrites 95.6%

   \[\leadsto 263.3831869810514 \cdot \left(\frac{1}{\frac{z}{e^{-7.5} \cdot \sqrt{15}}} \cdot \sqrt{\color{blue}{\pi}}\right) \]
7. Add Preprocessing

Alternative 12: 95.6% accurate, 8.3× speedup

Math

\[\begin{array}{l} \\ 263.3831869810514 \cdot \left(\frac{e^{-7.5} \cdot \sqrt{15}}{z} \cdot \sqrt{\pi}\right) \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (* 263.3831869810514 (* (/ (* (exp -7.5) (sqrt 15.0)) z) (sqrt PI))))

C

double code(double z) {
	return 263.3831869810514 * (((exp(-7.5) * sqrt(15.0)) / z) * sqrt(((double) M_PI)));
}

Java

public static double code(double z) {
	return 263.3831869810514 * (((Math.exp(-7.5) * Math.sqrt(15.0)) / z) * Math.sqrt(Math.PI));
}

Python

def code(z):
	return 263.3831869810514 * (((math.exp(-7.5) * math.sqrt(15.0)) / z) * math.sqrt(math.pi))

Julia

function code(z)
	return Float64(263.3831869810514 * Float64(Float64(Float64(exp(-7.5) * sqrt(15.0)) / z) * sqrt(pi)))
end

MATLAB

function tmp = code(z)
	tmp = 263.3831869810514 * (((exp(-7.5) * sqrt(15.0)) / z) * sqrt(pi));
end

Wolfram

code[z_] := N[(263.3831869810514 * N[(N[(N[(N[Exp[-7.5], $MachinePrecision] * N[Sqrt[15.0], $MachinePrecision]), $MachinePrecision] / z), $MachinePrecision] * N[Sqrt[Pi], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 96.5%

   \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

2. Taylor expanded in z around 0

   \[\leadsto \color{blue}{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \sqrt{\mathsf{PI}\left(\right)}\right)} \]
3. Step-by-step derivation

   1. lower-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \color{blue}{\left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \sqrt{\mathsf{PI}\left(\right)}\right)} \]

   2. lower-*.f64 N/A

      \[\leadsto \frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{z} \cdot \color{blue}{\sqrt{\mathsf{PI}\left(\right)}}\right) \]

4. Applied rewrites 95.7%

   \[\leadsto \color{blue}{263.3831869810514 \cdot \left(\frac{e^{-7.5} \cdot \sqrt{15}}{z} \cdot \sqrt{\pi}\right)} \]
5. Add Preprocessing

Alternative 13: 95.2% accurate, 8.3× speedup

Math

\[\begin{array}{l} \\ \frac{263.3831869810514 \cdot \left(\sqrt{\pi} \cdot \left(e^{-7.5} \cdot \sqrt{15}\right)\right)}{z} \end{array} \]

FPCore

(FPCore (z)
 :precision binary64
 (/ (* 263.3831869810514 (* (sqrt PI) (* (exp -7.5) (sqrt 15.0)))) z))

C

double code(double z) {
	return (263.3831869810514 * (sqrt(((double) M_PI)) * (exp(-7.5) * sqrt(15.0)))) / z;
}

Java

public static double code(double z) {
	return (263.3831869810514 * (Math.sqrt(Math.PI) * (Math.exp(-7.5) * Math.sqrt(15.0)))) / z;
}

Python

def code(z):
	return (263.3831869810514 * (math.sqrt(math.pi) * (math.exp(-7.5) * math.sqrt(15.0)))) / z

Julia

function code(z)
	return Float64(Float64(263.3831869810514 * Float64(sqrt(pi) * Float64(exp(-7.5) * sqrt(15.0)))) / z)
end

MATLAB

function tmp = code(z)
	tmp = (263.3831869810514 * (sqrt(pi) * (exp(-7.5) * sqrt(15.0)))) / z;
end

Wolfram

code[z_] := N[(N[(263.3831869810514 * N[(N[Sqrt[Pi], $MachinePrecision] * N[(N[Exp[-7.5], $MachinePrecision] * N[Sqrt[15.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / z), $MachinePrecision]

Derivation

1. Initial program 96.5%

   \[\frac{\pi}{\sin \left(\pi \cdot z\right)} \cdot \left(\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}^{\left(\left(\left(1 - z\right) - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(\left(1 - z\right) - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right) \]

2. Taylor expanded in z around 0

   \[\leadsto \color{blue}{\frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)\right)\right) + \left(z \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)}{\mathsf{PI}\left(\right)} + \frac{e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \left(\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\frac{15}{2}} \cdot \left(-1 \cdot \log \frac{15}{2} - \frac{1}{15}\right)\right) + \frac{102757979785251069442117317613}{235200000000000000000000000} \cdot \sqrt{\frac{15}{2}}\right)\right)}{\mathsf{PI}\left(\right)}\right)\right) \cdot \sqrt{{\mathsf{PI}\left(\right)}^{3}}}{z}} \]

4. Applied rewrites 96.1%

   \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(263.3831869810514, \sqrt{\pi} \cdot \left(e^{-7.5} \cdot \sqrt{15}\right), \left(z \cdot \mathsf{fma}\left(263.3831869810514, \frac{e^{-7.5} \cdot \sqrt{15}}{\pi}, \frac{e^{-7.5} \cdot \left(\sqrt{2} \cdot \mathsf{fma}\left(263.3831869810514, \sqrt{7.5} \cdot \left(\log 0.13333333333333333 - 0.06666666666666667\right), 436.8961725563396 \cdot \sqrt{7.5}\right)\right)}{\pi}\right)\right) \cdot \sqrt{\left(\pi \cdot \pi\right) \cdot \pi}\right)}{z}} \]

5. Taylor expanded in z around 0

   \[\leadsto \frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\frac{-15}{2}} \cdot \sqrt{15}\right)\right)}{z} \]
6. Step-by-step derivation

   1. metadata-eval N/A

      \[\leadsto \frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\frac{-15}{2}} \cdot \sqrt{2 \cdot \frac{15}{2}}\right)\right)}{z} \]

   2. sqrt-unprod N/A

      \[\leadsto \frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)\right)\right)}{z} \]

   3. lower-*.f64 N/A

      \[\leadsto \frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\frac{-15}{2}} \cdot \left(\sqrt{2} \cdot \sqrt{\frac{15}{2}}\right)\right)\right)}{z} \]

   4. sqrt-unprod N/A

      \[\leadsto \frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\frac{-15}{2}} \cdot \sqrt{2 \cdot \frac{15}{2}}\right)\right)}{z} \]

   5. metadata-eval N/A

      \[\leadsto \frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\frac{-15}{2}} \cdot \sqrt{15}\right)\right)}{z} \]

   6. lift-sqrt.f64 N/A

      \[\leadsto \frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot \left(e^{\frac{-15}{2}} \cdot \sqrt{15}\right)\right)}{z} \]

   7. lift-PI.f64 N/A

      \[\leadsto \frac{\frac{1106209385320415913103082059}{4200000000000000000000000} \cdot \left(\sqrt{\pi} \cdot \left(e^{\frac{-15}{2}} \cdot \sqrt{15}\right)\right)}{z} \]

7. Applied rewrites 95.2%

   \[\leadsto \frac{263.3831869810514 \cdot \left(\sqrt{\pi} \cdot \left(e^{-7.5} \cdot \sqrt{15}\right)\right)}{z} \]
8. Add Preprocessing

Reproduce

herbie shell --seed 2025128 
(FPCore (z)
  :name "Jmat.Real.gamma, branch z less than 0.5"
  :precision binary64
  :pre (<= z 0.5)
  (* (/ PI (sin (* PI z))) (* (* (* (sqrt (* PI 2.0)) (pow (+ (+ (- (- 1.0 z) 1.0) 7.0) 0.5) (+ (- (- 1.0 z) 1.0) 0.5))) (exp (- (+ (+ (- (- 1.0 z) 1.0) 7.0) 0.5)))) (+ (+ (+ (+ (+ (+ (+ (+ 0.9999999999998099 (/ 676.5203681218851 (+ (- (- 1.0 z) 1.0) 1.0))) (/ -1259.1392167224028 (+ (- (- 1.0 z) 1.0) 2.0))) (/ 771.3234287776531 (+ (- (- 1.0 z) 1.0) 3.0))) (/ -176.6150291621406 (+ (- (- 1.0 z) 1.0) 4.0))) (/ 12.507343278686905 (+ (- (- 1.0 z) 1.0) 5.0))) (/ -0.13857109526572012 (+ (- (- 1.0 z) 1.0) 6.0))) (/ 9.984369578019572e-6 (+ (- (- 1.0 z) 1.0) 7.0))) (/ 1.5056327351493116e-7 (+ (- (- 1.0 z) 1.0) 8.0))))))