\[\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(z - 1\right) + 7\\
t_1 := t\_0 + 0.5\\
\left(\left(\sqrt{\mathsf{PI}\left(\right) \cdot 2} \cdot {t\_1}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-t\_1}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{t\_0}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(z - 1\right) + 8}\right)
\end{array}
\end{array}
\]
(FPCore (z)
:precision binary64
(let* ((t_0 (+ (- z 1.0) 7.0)) (t_1 (+ t_0 0.5)))
(*
(* (* (sqrt (* (PI) 2.0)) (pow t_1 (+ (- z 1.0) 0.5))) (exp (- t_1)))
(+
(+
(+
(+
(+
(+
(+
(+ 0.9999999999998099 (/ 676.5203681218851 (+ (- z 1.0) 1.0)))
(/ -1259.1392167224028 (+ (- z 1.0) 2.0)))
(/ 771.3234287776531 (+ (- z 1.0) 3.0)))
(/ -176.6150291621406 (+ (- z 1.0) 4.0)))
(/ 12.507343278686905 (+ (- z 1.0) 5.0)))
(/ -0.13857109526572012 (+ (- z 1.0) 6.0)))
(/ 9.984369578019572e-6 t_0))
(/ 1.5056327351493116e-7 (+ (- z 1.0) 8.0))))))
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(z - 1\right) + 7\\
t_1 := t\_0 + 0.5\\
\left(\left(\sqrt{\mathsf{PI}\left(\right) \cdot 2} \cdot {t\_1}^{\left(\left(z - 1\right) + 0.5\right)}\right) \cdot e^{-t\_1}\right) \cdot \left(\left(\left(\left(\left(\left(\left(\left(0.9999999999998099 + \frac{676.5203681218851}{\left(z - 1\right) + 1}\right) + \frac{-1259.1392167224028}{\left(z - 1\right) + 2}\right) + \frac{771.3234287776531}{\left(z - 1\right) + 3}\right) + \frac{-176.6150291621406}{\left(z - 1\right) + 4}\right) + \frac{12.507343278686905}{\left(z - 1\right) + 5}\right) + \frac{-0.13857109526572012}{\left(z - 1\right) + 6}\right) + \frac{9.984369578019572 \cdot 10^{-6}}{t\_0}\right) + \frac{1.5056327351493116 \cdot 10^{-7}}{\left(z - 1\right) + 8}\right)
\end{array}
\end{array}