
(FPCore (f) :precision binary64 (let* ((t_0 (/ (PI) 4.0)) (t_1 (* t_0 f)) (t_2 (exp t_1)) (t_3 (exp (- t_1)))) (- (* (/ 1.0 t_0) (log (/ (+ t_2 t_3) (- t_2 t_3)))))))
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{\mathsf{PI}\left(\right)}{4}\\
t_1 := t\_0 \cdot f\\
t_2 := e^{t\_1}\\
t_3 := e^{-t\_1}\\
-\frac{1}{t\_0} \cdot \log \left(\frac{t\_2 + t\_3}{t\_2 - t\_3}\right)
\end{array}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 6 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (f) :precision binary64 (let* ((t_0 (/ (PI) 4.0)) (t_1 (* t_0 f)) (t_2 (exp t_1)) (t_3 (exp (- t_1)))) (- (* (/ 1.0 t_0) (log (/ (+ t_2 t_3) (- t_2 t_3)))))))
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{\mathsf{PI}\left(\right)}{4}\\
t_1 := t\_0 \cdot f\\
t_2 := e^{t\_1}\\
t_3 := e^{-t\_1}\\
-\frac{1}{t\_0} \cdot \log \left(\frac{t\_2 + t\_3}{t\_2 - t\_3}\right)
\end{array}
\end{array}
(FPCore (f) :precision binary64 (let* ((t_0 (* (PI) f))) (* (/ (log (/ (cosh (* t_0 -0.25)) (sinh (* t_0 0.25)))) (PI)) -4.0)))
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \mathsf{PI}\left(\right) \cdot f\\
\frac{\log \left(\frac{\cosh \left(t\_0 \cdot -0.25\right)}{\sinh \left(t\_0 \cdot 0.25\right)}\right)}{\mathsf{PI}\left(\right)} \cdot -4
\end{array}
\end{array}
Initial program 5.4%
lift-neg.f64N/A
lift-*.f64N/A
*-commutativeN/A
lift-/.f64N/A
lift-/.f64N/A
associate-/r/N/A
Applied rewrites96.4%
Taylor expanded in f around 0
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
lower-PI.f6496.4
Applied rewrites96.4%
Taylor expanded in f around 0
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
lower-PI.f6496.4
Applied rewrites96.4%
(FPCore (f)
:precision binary64
(*
(/ -1.0 (/ (PI) 4.0))
(log
(/
(fma
(fma
(fma
(* (/ (/ (pow (PI) 3.0) (PI)) (PI)) 0.020833333333333332)
-2.0
(* (/ (* (PI) (PI)) (PI)) 0.125))
f
0.0)
f
(/ 2.0 (* 0.5 (PI))))
f))))\begin{array}{l}
\\
\frac{-1}{\frac{\mathsf{PI}\left(\right)}{4}} \cdot \log \left(\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{\frac{{\mathsf{PI}\left(\right)}^{3}}{\mathsf{PI}\left(\right)}}{\mathsf{PI}\left(\right)} \cdot 0.020833333333333332, -2, \frac{\mathsf{PI}\left(\right) \cdot \mathsf{PI}\left(\right)}{\mathsf{PI}\left(\right)} \cdot 0.125\right), f, 0\right), f, \frac{2}{0.5 \cdot \mathsf{PI}\left(\right)}\right)}{f}\right)
\end{array}
Initial program 5.4%
Taylor expanded in f around 0
Applied rewrites96.0%
Final simplification96.0%
(FPCore (f) :precision binary64 (let* ((t_0 (sqrt (PI)))) (* (/ (log (/ 2.0 (* (* (* f 0.5) t_0) t_0))) (PI)) -4.0)))
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sqrt{\mathsf{PI}\left(\right)}\\
\frac{\log \left(\frac{2}{\left(\left(f \cdot 0.5\right) \cdot t\_0\right) \cdot t\_0}\right)}{\mathsf{PI}\left(\right)} \cdot -4
\end{array}
\end{array}
Initial program 5.4%
lift-neg.f64N/A
lift-*.f64N/A
*-commutativeN/A
lift-/.f64N/A
lift-/.f64N/A
associate-/r/N/A
Applied rewrites96.4%
Taylor expanded in f around 0
lower-/.f64N/A
*-commutativeN/A
lower-*.f64N/A
distribute-rgt-out--N/A
metadata-evalN/A
*-commutativeN/A
lower-*.f64N/A
lower-PI.f6495.8
Applied rewrites95.8%
Applied rewrites95.8%
(FPCore (f) :precision binary64 (* (/ (log (/ (/ 4.0 (PI)) f)) (PI)) -4.0))
\begin{array}{l}
\\
\frac{\log \left(\frac{\frac{4}{\mathsf{PI}\left(\right)}}{f}\right)}{\mathsf{PI}\left(\right)} \cdot -4
\end{array}
Initial program 5.4%
lift-neg.f64N/A
lift-*.f64N/A
*-commutativeN/A
lift-/.f64N/A
lift-/.f64N/A
associate-/r/N/A
Applied rewrites96.4%
Taylor expanded in f around 0
lower-/.f64N/A
*-commutativeN/A
lower-*.f64N/A
distribute-rgt-out--N/A
metadata-evalN/A
*-commutativeN/A
lower-*.f64N/A
lower-PI.f6495.8
Applied rewrites95.8%
Applied rewrites95.8%
(FPCore (f) :precision binary64 (/ (* (log (/ 4.0 (* f (PI)))) -4.0) (PI)))
\begin{array}{l}
\\
\frac{\log \left(\frac{4}{f \cdot \mathsf{PI}\left(\right)}\right) \cdot -4}{\mathsf{PI}\left(\right)}
\end{array}
Initial program 5.4%
lift-neg.f64N/A
lift-*.f64N/A
*-commutativeN/A
lift-/.f64N/A
lift-/.f64N/A
associate-/r/N/A
Applied rewrites96.4%
Taylor expanded in f around 0
lower-/.f64N/A
*-commutativeN/A
lower-*.f64N/A
distribute-rgt-out--N/A
metadata-evalN/A
*-commutativeN/A
lower-*.f64N/A
lower-PI.f6495.8
Applied rewrites95.8%
lift-*.f64N/A
lift-/.f64N/A
associate-*l/N/A
lower-/.f64N/A
Applied rewrites95.8%
(FPCore (f) :precision binary64 (* (log (/ 4.0 (* f (PI)))) (/ -4.0 (PI))))
\begin{array}{l}
\\
\log \left(\frac{4}{f \cdot \mathsf{PI}\left(\right)}\right) \cdot \frac{-4}{\mathsf{PI}\left(\right)}
\end{array}
Initial program 5.4%
lift-neg.f64N/A
lift-*.f64N/A
*-commutativeN/A
lift-/.f64N/A
lift-/.f64N/A
associate-/r/N/A
Applied rewrites96.4%
Taylor expanded in f around 0
lower-/.f64N/A
*-commutativeN/A
lower-*.f64N/A
distribute-rgt-out--N/A
metadata-evalN/A
*-commutativeN/A
lower-*.f64N/A
lower-PI.f6495.8
Applied rewrites95.8%
lift-*.f64N/A
lift-/.f64N/A
associate-*l/N/A
associate-/l*N/A
metadata-evalN/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/r*N/A
lift-*.f64N/A
lift-/.f64N/A
Applied rewrites95.7%
herbie shell --seed 2024350
(FPCore (f)
:name "VandenBroeck and Keller, Equation (20)"
:precision binary64
(- (* (/ 1.0 (/ (PI) 4.0)) (log (/ (+ (exp (* (/ (PI) 4.0) f)) (exp (- (* (/ (PI) 4.0) f)))) (- (exp (* (/ (PI) 4.0) f)) (exp (- (* (/ (PI) 4.0) f)))))))))