\[\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-06}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-07}}{\left(z - 1\right) + 8}\right)\]
Test:
Jmat.Real.gamma, branch z greater than 0.5
Bits:
128 bits
Bits error versus z
Time: 3.5 m
Input Error: 26.9
Output Error: 0.8
Log:
Profile: 🕒
\(\begin{cases} \frac{\left(\left(\left(1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right) + \left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right) + \left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)\right)\right) \cdot \left({\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}\right)}{\left(\left(\left(\left(\left(\left(5 + z\right) - 1\right) \cdot \left(6 + \left(z - 1\right)\right)\right) \cdot \left(\left(z - \left(1 - 7\right)\right) \cdot \left(\left(8 - 1\right) + z\right)\right)\right) \cdot \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{3 + \left(z - 1\right)}\right)\right) \cdot \left((0.9999999999998099 * \left(0.9999999999998099 - \frac{676.5203681218851}{z - 0}\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2\right))_* \cdot \left(\left(4 - 1\right) + z\right)\right)\right) \cdot e^{\left(7 + 0.5\right) + \left(z - 1\right)}} & \text{when } z \le -0.002604022f0 \\ (676.5203681218851 * \left(\left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right) \cdot \left(\log 6.5 \cdot \frac{\sqrt{2}}{e^{6.5}} + \frac{\frac{\sqrt{2}}{e^{6.5}}}{z}\right)\right) + \left(\left(338.26018406094255 \cdot \frac{\sqrt{2} \cdot z}{\frac{e^{6.5}}{{\left(\log 6.5\right)}^2}}\right) \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right))_* - \left(1656.8104518737205 \cdot (\left(\frac{\left(\sqrt{2} \cdot z\right) \cdot \log 6.5}{e^{6.5}}\right) * \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right) + \left(\left(\sqrt{\pi} \cdot \frac{\sqrt{2}}{e^{6.5}}\right) \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right))_* - 2585.1948787825354 \cdot \left({\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5} \cdot \frac{z \cdot \sqrt{\pi}}{\frac{e^{6.5}}{\sqrt{2}}}\right)\right) & \text{otherwise} \end{cases}\)

    if z < -0.002604022f0

    1. Started with
      \[\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-06}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-07}}{\left(z - 1\right) + 8}\right)\]
      6.1
    2. Applied simplify to get
      \[\color{red}{\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-06}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-07}}{\left(z - 1\right) + 8}\right)} \leadsto \color{blue}{\left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \left(\left(\frac{676.5203681218851}{z - 0} + 0.9999999999998099\right) + \frac{-176.6150291621406}{\left(z + 4\right) - 1}\right)\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}}\]
      4.7
    3. Using strategy rm
      4.7
    4. Applied flip3-+ to get
      \[\left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \left(\color{red}{\left(\frac{676.5203681218851}{z - 0} + 0.9999999999998099\right)} + \frac{-176.6150291621406}{\left(z + 4\right) - 1}\right)\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \left(\color{blue}{\frac{{\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}}{{\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)}} + \frac{-176.6150291621406}{\left(z + 4\right) - 1}\right)\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}\]
      4.5
    5. Applied frac-add to get
      \[\left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \color{red}{\left(\frac{{\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}}{{\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)} + \frac{-176.6150291621406}{\left(z + 4\right) - 1}\right)}\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \color{blue}{\frac{\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406}{\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)}}\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}\]
      4.5
    6. Applied flip-+ to get
      \[\left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\color{red}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right)} + \frac{\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406}{\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)}\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\color{blue}{\frac{{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2}{\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}}} + \frac{\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406}{\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)}\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}\]
      4.5
    7. Applied frac-add to get
      \[\left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \color{red}{\left(\frac{{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2}{\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}} + \frac{\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406}{\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)}\right)}\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \color{blue}{\frac{\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)}}\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}\]
      4.5
    8. Applied frac-add to get
      \[\left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \color{red}{\left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)}\right) + \frac{\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)}\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \color{blue}{\frac{-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905}{\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)}}\right) + \frac{\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)}\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}\]
      4.5
    9. Applied frac-add to get
      \[\left(\left(\color{red}{\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right)} + \frac{-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905}{\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)}\right) + \frac{\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)}\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \left(\left(\color{blue}{\frac{1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}}{\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)}} + \frac{-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905}{\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)}\right) + \frac{\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)}\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}\]
      4.5
    10. Applied frac-add to get
      \[\left(\color{red}{\left(\frac{1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}}{\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)} + \frac{-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905}{\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)}\right)} + \frac{\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)}\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \left(\color{blue}{\frac{\left(1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right) + \left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905\right)}{\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)}} + \frac{\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)}\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}\]
      4.5
    11. Applied frac-add to get
      \[\color{red}{\left(\frac{\left(1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right) + \left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905\right)}{\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)} + \frac{\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)}{\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)}\right)} \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \color{blue}{\frac{\left(\left(1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right) + \left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right) + \left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)\right)}{\left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right)}} \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}\]
      4.5
    12. Applied frac-times to get
      \[\color{red}{\frac{\left(\left(1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right) + \left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right) + \left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)\right)}{\left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right)} \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}} \leadsto \color{blue}{\frac{\left(\left(\left(1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right) + \left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right) + \left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)\right)\right) \cdot \left({\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}\right)}{\left(\left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right)\right) \cdot e^{\left(z - 1\right) + \left(0.5 + 7\right)}}}\]
      4.5
    13. Applied simplify to get
      \[\frac{\left(\left(\left(1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right) + \left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right) + \left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)\right)\right) \cdot \left({\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}\right)}{\color{red}{\left(\left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right)\right) \cdot e^{\left(z - 1\right) + \left(0.5 + 7\right)}}} \leadsto \frac{\left(\left(\left(1.5056327351493116 \cdot 10^{-07} \cdot \left(7 + \left(z - 1\right)\right) + \left(\left(z + 8\right) - 1\right) \cdot 9.984369578019572 \cdot 10^{-06}\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right) + \left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(-0.13857109526572012 \cdot \left(z - \left(1 - 5\right)\right) + \left(\left(z - 1\right) + 6\right) \cdot 12.507343278686905\right)\right) \cdot \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right)\right) + \left(\left(\left(\left(z + 8\right) - 1\right) \cdot \left(7 + \left(z - 1\right)\right)\right) \cdot \left(\left(\left(z - 1\right) + 6\right) \cdot \left(z - \left(1 - 5\right)\right)\right)\right) \cdot \left(\left({\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)}\right)}^2 - {\left(\frac{771.3234287776531}{\left(z - 1\right) + 3}\right)}^2\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot \left(\left(z + 4\right) - 1\right)\right) + \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) \cdot \left(\left({\left(\frac{676.5203681218851}{z - 0}\right)}^{3} - {0.9999999999998099}^{3}\right) \cdot \left(\left(z + 4\right) - 1\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2 + \left({0.9999999999998099}^2 - \frac{676.5203681218851}{z - 0} \cdot 0.9999999999998099\right)\right) \cdot -176.6150291621406\right)\right)\right) \cdot \left({\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}\right)}{\color{blue}{\left(\left(\left(\left(\left(\left(5 + z\right) - 1\right) \cdot \left(6 + \left(z - 1\right)\right)\right) \cdot \left(\left(z - \left(1 - 7\right)\right) \cdot \left(\left(8 - 1\right) + z\right)\right)\right) \cdot \left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} - \frac{771.3234287776531}{3 + \left(z - 1\right)}\right)\right) \cdot \left((0.9999999999998099 * \left(0.9999999999998099 - \frac{676.5203681218851}{z - 0}\right) + \left({\left(\frac{676.5203681218851}{z - 0}\right)}^2\right))_* \cdot \left(\left(4 - 1\right) + z\right)\right)\right) \cdot e^{\left(7 + 0.5\right) + \left(z - 1\right)}}}\]
      4.6

    if -0.002604022f0 < z

    1. Started with
      \[\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-06}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-07}}{\left(z - 1\right) + 8}\right)\]
      27.6
    2. Applied simplify to get
      \[\color{red}{\left(\left(\sqrt{\pi \cdot 2} \cdot {\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-\left(\left(\left(z - 1\right) + 7\right) + 0.5\right)}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-06}}{\left(z - 1\right) + 7}\right) + \frac{1.5056327351493116 \cdot 10^{-07}}{\left(z - 1\right) + 8}\right)} \leadsto \color{blue}{\left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \left(\left(\frac{676.5203681218851}{z - 0} + 0.9999999999998099\right) + \frac{-176.6150291621406}{\left(z + 4\right) - 1}\right)\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}}}\]
      11.4
    3. Applied taylor to get
      \[\left(\left(\left(\frac{1.5056327351493116 \cdot 10^{-07}}{\left(z + 8\right) - 1} + \frac{9.984369578019572 \cdot 10^{-06}}{7 + \left(z - 1\right)}\right) + \left(\frac{-0.13857109526572012}{\left(z - 1\right) + 6} + \frac{12.507343278686905}{z - \left(1 - 5\right)}\right)\right) + \left(\left(\frac{-1259.1392167224028}{z - \left(1 - 2\right)} + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \left(\left(\frac{676.5203681218851}{z - 0} + 0.9999999999998099\right) + \frac{-176.6150291621406}{\left(z + 4\right) - 1}\right)\right)\right) \cdot \frac{{\left(\left(z - 1\right) + \left(0.5 + 7\right)\right)}^{\left(0.5 + \left(z - 1\right)\right)} \cdot \sqrt{2 \cdot \pi}}{e^{\left(z - 1\right) + \left(0.5 + 7\right)}} \leadsto \left(2585.1948787825354 \cdot \left(\frac{z \cdot \sqrt{2}}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + \left(338.26018406094255 \cdot \left(\frac{z \cdot \left(\sqrt{2} \cdot {\left(\log 6.5\right)}^2\right)}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + \left(676.5203681218851 \cdot \left(\frac{\sqrt{2}}{e^{6.5} \cdot z} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + 676.5203681218851 \cdot \left(\frac{\sqrt{2} \cdot \log 6.5}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right)\right)\right)\right) - \left(1656.8104518737205 \cdot \left(\frac{\sqrt{2}}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + 1656.8104518737205 \cdot \left(\frac{z \cdot \left(\sqrt{2} \cdot \log 6.5\right)}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right)\right)\]
      0.1
    4. Taylor expanded around 0 to get
      \[\color{red}{\left(2585.1948787825354 \cdot \left(\frac{z \cdot \sqrt{2}}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + \left(338.26018406094255 \cdot \left(\frac{z \cdot \left(\sqrt{2} \cdot {\left(\log 6.5\right)}^2\right)}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + \left(676.5203681218851 \cdot \left(\frac{\sqrt{2}}{e^{6.5} \cdot z} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + 676.5203681218851 \cdot \left(\frac{\sqrt{2} \cdot \log 6.5}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right)\right)\right)\right) - \left(1656.8104518737205 \cdot \left(\frac{\sqrt{2}}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + 1656.8104518737205 \cdot \left(\frac{z \cdot \left(\sqrt{2} \cdot \log 6.5\right)}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right)\right)} \leadsto \color{blue}{\left(2585.1948787825354 \cdot \left(\frac{z \cdot \sqrt{2}}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + \left(338.26018406094255 \cdot \left(\frac{z \cdot \left(\sqrt{2} \cdot {\left(\log 6.5\right)}^2\right)}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + \left(676.5203681218851 \cdot \left(\frac{\sqrt{2}}{e^{6.5} \cdot z} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + 676.5203681218851 \cdot \left(\frac{\sqrt{2} \cdot \log 6.5}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right)\right)\right)\right) - \left(1656.8104518737205 \cdot \left(\frac{\sqrt{2}}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + 1656.8104518737205 \cdot \left(\frac{z \cdot \left(\sqrt{2} \cdot \log 6.5\right)}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right)\right)}\]
      0.1
    5. Applied simplify to get
      \[\color{red}{\left(2585.1948787825354 \cdot \left(\frac{z \cdot \sqrt{2}}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + \left(338.26018406094255 \cdot \left(\frac{z \cdot \left(\sqrt{2} \cdot {\left(\log 6.5\right)}^2\right)}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + \left(676.5203681218851 \cdot \left(\frac{\sqrt{2}}{e^{6.5} \cdot z} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + 676.5203681218851 \cdot \left(\frac{\sqrt{2} \cdot \log 6.5}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right)\right)\right)\right) - \left(1656.8104518737205 \cdot \left(\frac{\sqrt{2}}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right) + 1656.8104518737205 \cdot \left(\frac{z \cdot \left(\sqrt{2} \cdot \log 6.5\right)}{e^{6.5}} \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right)\right)} \leadsto \color{blue}{(676.5203681218851 * \left(\left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right) \cdot \left(\log 6.5 \cdot \frac{\sqrt{2}}{e^{6.5}} + \frac{\frac{\sqrt{2}}{e^{6.5}}}{z}\right)\right) + \left(\left(338.26018406094255 \cdot \frac{\sqrt{2} \cdot z}{\frac{e^{6.5}}{{\left(\log 6.5\right)}^2}}\right) \cdot \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right)\right))_* - \left(1656.8104518737205 \cdot (\left(\frac{\left(\sqrt{2} \cdot z\right) \cdot \log 6.5}{e^{6.5}}\right) * \left(\sqrt{\pi} \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right) + \left(\left(\sqrt{\pi} \cdot \frac{\sqrt{2}}{e^{6.5}}\right) \cdot {\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5}\right))_* - 2585.1948787825354 \cdot \left({\left(\frac{1}{{6.5}^{1.0}}\right)}^{0.5} \cdot \frac{z \cdot \sqrt{\pi}}{\frac{e^{6.5}}{\sqrt{2}}}\right)\right)}\]
      0.7

  1. Removed slow pow expressions

Original test:


(lambda ((z default))
  #:name "Jmat.Real.gamma, branch z greater than 0.5"
  (* (* (* (sqrt (* PI 2)) (pow (+ (+ (- z 1) 7) 0.5) (+ (- z 1) 0.5))) (exp (- (+ (+ (- z 1) 7) 0.5)))) (+ (+ (+ (+ (+ (+ (+ (+ 0.9999999999998099 (/ 676.5203681218851 (+ (- z 1) 1))) (/ -1259.1392167224028 (+ (- z 1) 2))) (/ 771.3234287776531 (+ (- z 1) 3))) (/ -176.6150291621406 (+ (- z 1) 4))) (/ 12.507343278686905 (+ (- z 1) 5))) (/ -0.13857109526572012 (+ (- z 1) 6))) (/ 9.984369578019572e-06 (+ (- z 1) 7))) (/ 1.5056327351493116e-07 (+ (- z 1) 8)))))