Numeric.SpecFunctions:logGamma from math-functions-0.1.5.2, D

Average Error: 30.0 → 1.3

Time: 20.6s

Precision: 64

Math

\[x + \frac{y \cdot \left(\left(\left(\left(z \cdot 3.130605476229999961645944495103321969509 + 11.16675412620000074070958362426608800888\right) \cdot z + t\right) \cdot z + a\right) \cdot z + b\right)}{\left(\left(\left(z + 15.2346874069999991263557603815570473671\right) \cdot z + 31.46901157490000144889563671313226222992\right) \cdot z + 11.94009057210000079862766142468899488449\right) \cdot z + 0.6077713877710000378584709324059076607227}\]

↓

\[\begin{array}{l} \mathbf{if}\;z \le -3.872768584981007264149213023385655473325 \cdot 10^{52} \lor \neg \left(z \le 3699919717599674892288\right):\\ \;\;\;\;\mathsf{fma}\left(y, \frac{t}{{z}^{2}} + 3.130605476229999961645944495103321969509, x\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y \cdot \left(\frac{1}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}} \cdot \frac{1}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}\right), \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)\\ \end{array}\]

C

double f(double x, double y, double z, double t, double a, double b) {
        double r247472 = x;
        double r247473 = y;
        double r247474 = z;
        double r247475 = 3.13060547623;
        double r247476 = r247474 * r247475;
        double r247477 = 11.1667541262;
        double r247478 = r247476 + r247477;
        double r247479 = r247478 * r247474;
        double r247480 = t;
        double r247481 = r247479 + r247480;
        double r247482 = r247481 * r247474;
        double r247483 = a;
        double r247484 = r247482 + r247483;
        double r247485 = r247484 * r247474;
        double r247486 = b;
        double r247487 = r247485 + r247486;
        double r247488 = r247473 * r247487;
        double r247489 = 15.234687407;
        double r247490 = r247474 + r247489;
        double r247491 = r247490 * r247474;
        double r247492 = 31.4690115749;
        double r247493 = r247491 + r247492;
        double r247494 = r247493 * r247474;
        double r247495 = 11.9400905721;
        double r247496 = r247494 + r247495;
        double r247497 = r247496 * r247474;
        double r247498 = 0.607771387771;
        double r247499 = r247497 + r247498;
        double r247500 = r247488 / r247499;
        double r247501 = r247472 + r247500;
        return r247501;
}

↓

double f(double x, double y, double z, double t, double a, double b) {
        double r247502 = z;
        double r247503 = -3.872768584981007e+52;
        bool r247504 = r247502 <= r247503;
        double r247505 = 3.699919717599675e+21;
        bool r247506 = r247502 <= r247505;
        double r247507 = !r247506;
        bool r247508 = r247504 || r247507;
        double r247509 = y;
        double r247510 = t;
        double r247511 = 2.0;
        double r247512 = pow(r247502, r247511);
        double r247513 = r247510 / r247512;
        double r247514 = 3.13060547623;
        double r247515 = r247513 + r247514;
        double r247516 = x;
        double r247517 = fma(r247509, r247515, r247516);
        double r247518 = 1.0;
        double r247519 = 15.234687407;
        double r247520 = r247502 + r247519;
        double r247521 = 31.4690115749;
        double r247522 = fma(r247520, r247502, r247521);
        double r247523 = 11.9400905721;
        double r247524 = fma(r247522, r247502, r247523);
        double r247525 = 0.607771387771;
        double r247526 = fma(r247524, r247502, r247525);
        double r247527 = sqrt(r247526);
        double r247528 = r247518 / r247527;
        double r247529 = r247528 * r247528;
        double r247530 = r247509 * r247529;
        double r247531 = 11.1667541262;
        double r247532 = fma(r247502, r247514, r247531);
        double r247533 = fma(r247532, r247502, r247510);
        double r247534 = a;
        double r247535 = fma(r247533, r247502, r247534);
        double r247536 = b;
        double r247537 = fma(r247535, r247502, r247536);
        double r247538 = fma(r247530, r247537, r247516);
        double r247539 = r247508 ? r247517 : r247538;
        return r247539;
}

Error

Bits error versus x

Bits error versus y

Bits error versus z

Bits error versus t

Bits error versus a

Bits error versus b

Target

Original	30.0
Target	1.0
Herbie	1.3

\[\begin{array}{l} \mathbf{if}\;z \lt -6.499344996252631754123144978817242590467 \cdot 10^{53}:\\ \;\;\;\;x + \left(\left(3.130605476229999961645944495103321969509 - \frac{36.52704169880641416057187598198652267456}{z}\right) + \frac{t}{z \cdot z}\right) \cdot \frac{y}{1}\\ \mathbf{elif}\;z \lt 7.066965436914286795694558389038333165002 \cdot 10^{59}:\\ \;\;\;\;x + \frac{y}{\frac{\left(\left(\left(z + 15.2346874069999991263557603815570473671\right) \cdot z + 31.46901157490000144889563671313226222992\right) \cdot z + 11.94009057210000079862766142468899488449\right) \cdot z + 0.6077713877710000378584709324059076607227}{\left(\left(\left(z \cdot 3.130605476229999961645944495103321969509 + 11.16675412620000074070958362426608800888\right) \cdot z + t\right) \cdot z + a\right) \cdot z + b}}\\ \mathbf{else}:\\ \;\;\;\;x + \left(\left(3.130605476229999961645944495103321969509 - \frac{36.52704169880641416057187598198652267456}{z}\right) + \frac{t}{z \cdot z}\right) \cdot \frac{y}{1}\\ \end{array}\]

Derivation

1. Split input into 2 regimes

2. if z < -3.872768584981007e+52 or 3.699919717599675e+21 < z

   1. Initial program 59.8

      \[x + \frac{y \cdot \left(\left(\left(\left(z \cdot 3.130605476229999961645944495103321969509 + 11.16675412620000074070958362426608800888\right) \cdot z + t\right) \cdot z + a\right) \cdot z + b\right)}{\left(\left(\left(z + 15.2346874069999991263557603815570473671\right) \cdot z + 31.46901157490000144889563671313226222992\right) \cdot z + 11.94009057210000079862766142468899488449\right) \cdot z + 0.6077713877710000378584709324059076607227}\]

   2. Simplified 58.2

      \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{y}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}, \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)}\]

   3. Taylor expanded around inf 8.8

      \[\leadsto \color{blue}{x + \left(\frac{t \cdot y}{{z}^{2}} + 3.130605476229999961645944495103321969509 \cdot y\right)}\]

   4. Simplified 1.5

      \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{{z}^{2}} + 3.130605476229999961645944495103321969509, x\right)}\]

   if -3.872768584981007e+52 < z < 3.699919717599675e+21

   1. Initial program 1.7

      \[x + \frac{y \cdot \left(\left(\left(\left(z \cdot 3.130605476229999961645944495103321969509 + 11.16675412620000074070958362426608800888\right) \cdot z + t\right) \cdot z + a\right) \cdot z + b\right)}{\left(\left(\left(z + 15.2346874069999991263557603815570473671\right) \cdot z + 31.46901157490000144889563671313226222992\right) \cdot z + 11.94009057210000079862766142468899488449\right) \cdot z + 0.6077713877710000378584709324059076607227}\]

   2. Simplified 0.8

      \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{y}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}, \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)}\]
   3. Using strategy rm

   4. Applied div-inv 0.9

      \[\leadsto \mathsf{fma}\left(\color{blue}{y \cdot \frac{1}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}, \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)\]
   5. Using strategy rm

   6. Applied add-sqr-sqrt 1.3

      \[\leadsto \mathsf{fma}\left(y \cdot \frac{1}{\color{blue}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)} \cdot \sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}}, \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)\]

   7. Applied add-cube-cbrt 1.3

      \[\leadsto \mathsf{fma}\left(y \cdot \frac{\color{blue}{\left(\sqrt[3]{1} \cdot \sqrt[3]{1}\right) \cdot \sqrt[3]{1}}}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)} \cdot \sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}, \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)\]

   8. Applied times-frac 1.1

      \[\leadsto \mathsf{fma}\left(y \cdot \color{blue}{\left(\frac{\sqrt[3]{1} \cdot \sqrt[3]{1}}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}} \cdot \frac{\sqrt[3]{1}}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}\right)}, \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)\]

   9. Simplified 1.1

      \[\leadsto \mathsf{fma}\left(y \cdot \left(\color{blue}{\frac{1}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}} \cdot \frac{\sqrt[3]{1}}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}\right), \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)\]

   10. Simplified 1.1

       \[\leadsto \mathsf{fma}\left(y \cdot \left(\frac{1}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}} \cdot \color{blue}{\frac{1}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}}\right), \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)\]
3. Recombined 2 regimes into one program.

4. Final simplification 1.3

   \[\leadsto \begin{array}{l} \mathbf{if}\;z \le -3.872768584981007264149213023385655473325 \cdot 10^{52} \lor \neg \left(z \le 3699919717599674892288\right):\\ \;\;\;\;\mathsf{fma}\left(y, \frac{t}{{z}^{2}} + 3.130605476229999961645944495103321969509, x\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y \cdot \left(\frac{1}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}} \cdot \frac{1}{\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z + 15.2346874069999991263557603815570473671, z, 31.46901157490000144889563671313226222992\right), z, 11.94009057210000079862766142468899488449\right), z, 0.6077713877710000378584709324059076607227\right)}}\right), \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 3.130605476229999961645944495103321969509, 11.16675412620000074070958362426608800888\right), z, t\right), z, a\right), z, b\right), x\right)\\ \end{array}\]

Reproduce

herbie shell --seed 2019322 +o rules:numerics
(FPCore (x y z t a b)
  :name "Numeric.SpecFunctions:logGamma from math-functions-0.1.5.2, D"
  :precision binary64

  :herbie-target
  (if (< z -6.499344996252632e+53) (+ x (* (+ (- 3.13060547623 (/ 36.527041698806414 z)) (/ t (* z z))) (/ y 1))) (if (< z 7.066965436914287e+59) (+ x (/ y (/ (+ (* (+ (* (+ (* (+ z 15.234687407) z) 31.4690115749) z) 11.9400905721) z) 0.607771387771) (+ (* (+ (* (+ (* (+ (* z 3.13060547623) 11.1667541262) z) t) z) a) z) b)))) (+ x (* (+ (- 3.13060547623 (/ 36.527041698806414 z)) (/ t (* z z))) (/ y 1)))))

  (+ x (/ (* y (+ (* (+ (* (+ (* (+ (* z 3.13060547623) 11.1667541262) z) t) z) a) z) b)) (+ (* (+ (* (+ (* (+ z 15.234687407) z) 31.4690115749) z) 11.9400905721) z) 0.607771387771))))