\[\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.99999999999980993 + \frac{676.520368121885099}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.13921672240281}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.32342877765313}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.615029162140587}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.5073432786869052}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.138571095265720118}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.98436957801957158 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.50563273514931162 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right)\]

\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.99999999999980993 + \frac{676.520368121885099}{\left(\left(1 - z\right) - 1\right) + 1}\right) + \frac{-1259.13921672240281}{\left(\left(1 - z\right) - 1\right) + 2}\right) + \frac{771.32342877765313}{\left(\left(1 - z\right) - 1\right) + 3}\right) + \frac{-176.615029162140587}{\left(\left(1 - z\right) - 1\right) + 4}\right) + \frac{12.5073432786869052}{\left(\left(1 - z\right) - 1\right) + 5}\right) + \frac{-0.138571095265720118}{\left(\left(1 - z\right) - 1\right) + 6}\right) + \frac{9.98436957801957158 \cdot 10^{-6}}{\left(\left(1 - z\right) - 1\right) + 7}\right) + \frac{1.50563273514931162 \cdot 10^{-7}}{\left(\left(1 - z\right) - 1\right) + 8}\right)\right)

double f(double z) {
        double r198510 = atan2(1.0, 0.0);
        double r198511 = z;
        double r198512 = r198510 * r198511;
        double r198513 = sin(r198512);
        double r198514 = r198510 / r198513;
        double r198515 = 2.0;
        double r198516 = r198510 * r198515;
        double r198517 = sqrt(r198516);
        double r198518 = 1.0;
        double r198519 = r198518 - r198511;
        double r198520 = r198519 - r198518;
        double r198521 = 7.0;
        double r198522 = r198520 + r198521;
        double r198523 = 0.5;
        double r198524 = r198522 + r198523;
        double r198525 = r198520 + r198523;
        double r198526 = pow(r198524, r198525);
        double r198527 = r198517 * r198526;
        double r198528 = -r198524;
        double r198529 = exp(r198528);
        double r198530 = r198527 * r198529;
        double r198531 = 0.9999999999998099;
        double r198532 = 676.5203681218851;
        double r198533 = r198520 + r198518;
        double r198534 = r198532 / r198533;
        double r198535 = r198531 + r198534;
        double r198536 = -1259.1392167224028;
        double r198537 = r198520 + r198515;
        double r198538 = r198536 / r198537;
        double r198539 = r198535 + r198538;
        double r198540 = 771.3234287776531;
        double r198541 = 3.0;
        double r198542 = r198520 + r198541;
        double r198543 = r198540 / r198542;
        double r198544 = r198539 + r198543;
        double r198545 = -176.6150291621406;
        double r198546 = 4.0;
        double r198547 = r198520 + r198546;
        double r198548 = r198545 / r198547;
        double r198549 = r198544 + r198548;
        double r198550 = 12.507343278686905;
        double r198551 = 5.0;
        double r198552 = r198520 + r198551;
        double r198553 = r198550 / r198552;
        double r198554 = r198549 + r198553;
        double r198555 = -0.13857109526572012;
        double r198556 = 6.0;
        double r198557 = r198520 + r198556;
        double r198558 = r198555 / r198557;
        double r198559 = r198554 + r198558;
        double r198560 = 9.984369578019572e-06;
        double r198561 = r198560 / r198522;
        double r198562 = r198559 + r198561;
        double r198563 = 1.5056327351493116e-07;
        double r198564 = 8.0;
        double r198565 = r198520 + r198564;
        double r198566 = r198563 / r198565;
        double r198567 = r198562 + r198566;
        double r198568 = r198530 * r198567;
        double r198569 = r198514 * r198568;
        return r198569;
}

Reproduce

herbie shell --seed 2020047 +o rules:numerics
(FPCore (z)
  :name "Jmat.Real.gamma, branch z less than 0.5"
  :precision binary64
  (* (/ PI (sin (* PI z))) (* (* (* (sqrt (* PI 2)) (pow (+ (+ (- (- 1 z) 1) 7) 0.5) (+ (- (- 1 z) 1) 0.5))) (exp (- (+ (+ (- (- 1 z) 1) 7) 0.5)))) (+ (+ (+ (+ (+ (+ (+ (+ 0.9999999999998099 (/ 676.5203681218851 (+ (- (- 1 z) 1) 1))) (/ -1259.1392167224028 (+ (- (- 1 z) 1) 2))) (/ 771.3234287776531 (+ (- (- 1 z) 1) 3))) (/ -176.6150291621406 (+ (- (- 1 z) 1) 4))) (/ 12.507343278686905 (+ (- (- 1 z) 1) 5))) (/ -0.13857109526572012 (+ (- (- 1 z) 1) 6))) (/ 9.984369578019572e-06 (+ (- (- 1 z) 1) 7))) (/ 1.5056327351493116e-07 (+ (- (- 1 z) 1) 8))))))

Timeout in 10.0m

Reproduce