
(FPCore (x s) :precision binary32 (let* ((t_0 (exp (/ (- (fabs x)) s))) (t_1 (+ 1.0 t_0))) (/ t_0 (* (* s t_1) t_1))))
float code(float x, float s) {
float t_0 = expf((-fabsf(x) / s));
float t_1 = 1.0f + t_0;
return t_0 / ((s * t_1) * t_1);
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
real(4) :: t_1
t_0 = exp((-abs(x) / s))
t_1 = 1.0e0 + t_0
code = t_0 / ((s * t_1) * t_1)
end function
function code(x, s) t_0 = exp(Float32(Float32(-abs(x)) / s)) t_1 = Float32(Float32(1.0) + t_0) return Float32(t_0 / Float32(Float32(s * t_1) * t_1)) end
function tmp = code(x, s) t_0 = exp((-abs(x) / s)); t_1 = single(1.0) + t_0; tmp = t_0 / ((s * t_1) * t_1); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{-\left|x\right|}{s}}\\
t_1 := 1 + t\_0\\
\frac{t\_0}{\left(s \cdot t\_1\right) \cdot t\_1}
\end{array}
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 17 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x s) :precision binary32 (let* ((t_0 (exp (/ (- (fabs x)) s))) (t_1 (+ 1.0 t_0))) (/ t_0 (* (* s t_1) t_1))))
float code(float x, float s) {
float t_0 = expf((-fabsf(x) / s));
float t_1 = 1.0f + t_0;
return t_0 / ((s * t_1) * t_1);
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
real(4) :: t_1
t_0 = exp((-abs(x) / s))
t_1 = 1.0e0 + t_0
code = t_0 / ((s * t_1) * t_1)
end function
function code(x, s) t_0 = exp(Float32(Float32(-abs(x)) / s)) t_1 = Float32(Float32(1.0) + t_0) return Float32(t_0 / Float32(Float32(s * t_1) * t_1)) end
function tmp = code(x, s) t_0 = exp((-abs(x) / s)); t_1 = single(1.0) + t_0; tmp = t_0 / ((s * t_1) * t_1); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{-\left|x\right|}{s}}\\
t_1 := 1 + t\_0\\
\frac{t\_0}{\left(s \cdot t\_1\right) \cdot t\_1}
\end{array}
\end{array}
(FPCore (x s) :precision binary32 (let* ((t_0 (* -0.5 (/ (fabs x) s)))) (/ (exp t_0) (* s (exp (- (* 2.0 (log1p (exp (/ (fabs x) (- s))))) t_0))))))
float code(float x, float s) {
float t_0 = -0.5f * (fabsf(x) / s);
return expf(t_0) / (s * expf(((2.0f * log1pf(expf((fabsf(x) / -s)))) - t_0)));
}
function code(x, s) t_0 = Float32(Float32(-0.5) * Float32(abs(x) / s)) return Float32(exp(t_0) / Float32(s * exp(Float32(Float32(Float32(2.0) * log1p(exp(Float32(abs(x) / Float32(-s))))) - t_0)))) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := -0.5 \cdot \frac{\left|x\right|}{s}\\
\frac{e^{t\_0}}{s \cdot e^{2 \cdot \mathsf{log1p}\left(e^{\frac{\left|x\right|}{-s}}\right) - t\_0}}
\end{array}
\end{array}
Initial program 99.5%
lift-*.f32N/A
lift-+.f32N/A
+-commutativeN/A
distribute-rgt-inN/A
*-lft-identityN/A
lower-fma.f3299.5
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lower-neg.f32N/A
lower-/.f3299.5
Applied rewrites99.5%
lift-exp.f32N/A
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lift-/.f32N/A
neg-mul-1N/A
exp-prodN/A
lower-pow.f32N/A
lower-exp.f3299.5
Applied rewrites99.5%
Applied rewrites99.7%
Applied rewrites99.7%
Final simplification99.7%
(FPCore (x s) :precision binary32 (let* ((t_0 (exp (/ (fabs x) (- s))))) (/ (pow (exp -1.0) (/ (fabs x) s)) (* (fma t_0 s s) (+ t_0 1.0)))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
return powf(expf(-1.0f), (fabsf(x) / s)) / (fmaf(t_0, s, s) * (t_0 + 1.0f));
}
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) return Float32((exp(Float32(-1.0)) ^ Float32(abs(x) / s)) / Float32(fma(t_0, s, s) * Float32(t_0 + Float32(1.0)))) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
\frac{{\left(e^{-1}\right)}^{\left(\frac{\left|x\right|}{s}\right)}}{\mathsf{fma}\left(t\_0, s, s\right) \cdot \left(t\_0 + 1\right)}
\end{array}
\end{array}
Initial program 99.5%
lift-*.f32N/A
lift-+.f32N/A
+-commutativeN/A
distribute-rgt-inN/A
*-lft-identityN/A
lower-fma.f3299.5
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lower-neg.f32N/A
lower-/.f3299.5
Applied rewrites99.5%
lift-exp.f32N/A
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lift-/.f32N/A
neg-mul-1N/A
exp-prodN/A
lower-pow.f32N/A
lower-exp.f3299.5
Applied rewrites99.5%
Final simplification99.5%
(FPCore (x s)
:precision binary32
(let* ((t_0 (exp (/ (fabs x) (- s)))) (t_1 (+ t_0 1.0)))
(if (<= (/ t_0 (* t_1 (* s t_1))) 0.0)
(/ (/ (/ 1.0 (+ (/ (fabs x) s) (fma (* x x) (/ 0.5 (* s s)) 2.0))) s) 2.0)
(/ (fma (/ x s) (/ (* x -0.0625) s) 0.25) s))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
float t_1 = t_0 + 1.0f;
float tmp;
if ((t_0 / (t_1 * (s * t_1))) <= 0.0f) {
tmp = ((1.0f / ((fabsf(x) / s) + fmaf((x * x), (0.5f / (s * s)), 2.0f))) / s) / 2.0f;
} else {
tmp = fmaf((x / s), ((x * -0.0625f) / s), 0.25f) / s;
}
return tmp;
}
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) t_1 = Float32(t_0 + Float32(1.0)) tmp = Float32(0.0) if (Float32(t_0 / Float32(t_1 * Float32(s * t_1))) <= Float32(0.0)) tmp = Float32(Float32(Float32(Float32(1.0) / Float32(Float32(abs(x) / s) + fma(Float32(x * x), Float32(Float32(0.5) / Float32(s * s)), Float32(2.0)))) / s) / Float32(2.0)); else tmp = Float32(fma(Float32(x / s), Float32(Float32(x * Float32(-0.0625)) / s), Float32(0.25)) / s); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
t_1 := t\_0 + 1\\
\mathbf{if}\;\frac{t\_0}{t\_1 \cdot \left(s \cdot t\_1\right)} \leq 0:\\
\;\;\;\;\frac{\frac{\frac{1}{\frac{\left|x\right|}{s} + \mathsf{fma}\left(x \cdot x, \frac{0.5}{s \cdot s}, 2\right)}}{s}}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\mathsf{fma}\left(\frac{x}{s}, \frac{x \cdot -0.0625}{s}, 0.25\right)}{s}\\
\end{array}
\end{array}
if (/.f32 (exp.f32 (/.f32 (neg.f32 (fabs.f32 x)) s)) (*.f32 (*.f32 s (+.f32 #s(literal 1 binary32) (exp.f32 (/.f32 (neg.f32 (fabs.f32 x)) s)))) (+.f32 #s(literal 1 binary32) (exp.f32 (/.f32 (neg.f32 (fabs.f32 x)) s))))) < 0.0Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites99.5%
Applied rewrites99.5%
Taylor expanded in s around inf
associate-+r+N/A
+-commutativeN/A
lower-+.f32N/A
lower-/.f32N/A
lower-fabs.f32N/A
+-commutativeN/A
associate-*r/N/A
*-commutativeN/A
associate-/l*N/A
lower-fma.f32N/A
unpow2N/A
sqr-absN/A
lower-*.f32N/A
lower-/.f32N/A
unpow2N/A
lower-*.f3277.6
Applied rewrites77.6%
if 0.0 < (/.f32 (exp.f32 (/.f32 (neg.f32 (fabs.f32 x)) s)) (*.f32 (*.f32 s (+.f32 #s(literal 1 binary32) (exp.f32 (/.f32 (neg.f32 (fabs.f32 x)) s)))) (+.f32 #s(literal 1 binary32) (exp.f32 (/.f32 (neg.f32 (fabs.f32 x)) s))))) Initial program 99.4%
Taylor expanded in s around inf
lower-/.f32N/A
Applied rewrites67.5%
Applied rewrites90.7%
Final simplification80.9%
(FPCore (x s) :precision binary32 (let* ((t_0 (exp (/ (fabs x) (- s))))) (/ t_0 (* (fma t_0 s s) (+ t_0 1.0)))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
return t_0 / (fmaf(t_0, s, s) * (t_0 + 1.0f));
}
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) return Float32(t_0 / Float32(fma(t_0, s, s) * Float32(t_0 + Float32(1.0)))) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
\frac{t\_0}{\mathsf{fma}\left(t\_0, s, s\right) \cdot \left(t\_0 + 1\right)}
\end{array}
\end{array}
Initial program 99.5%
lift-*.f32N/A
lift-+.f32N/A
+-commutativeN/A
distribute-rgt-inN/A
*-lft-identityN/A
lower-fma.f3299.5
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lower-neg.f32N/A
lower-/.f3299.5
Applied rewrites99.5%
Final simplification99.5%
(FPCore (x s) :precision binary32 (/ -1.0 (* (fma s (exp (/ (fabs x) s)) s) (- -1.0 (exp (/ (fabs x) (- s)))))))
float code(float x, float s) {
return -1.0f / (fmaf(s, expf((fabsf(x) / s)), s) * (-1.0f - expf((fabsf(x) / -s))));
}
function code(x, s) return Float32(Float32(-1.0) / Float32(fma(s, exp(Float32(abs(x) / s)), s) * Float32(Float32(-1.0) - exp(Float32(abs(x) / Float32(-s)))))) end
\begin{array}{l}
\\
\frac{-1}{\mathsf{fma}\left(s, e^{\frac{\left|x\right|}{s}}, s\right) \cdot \left(-1 - e^{\frac{\left|x\right|}{-s}}\right)}
\end{array}
Initial program 99.5%
lift-*.f32N/A
lift-+.f32N/A
+-commutativeN/A
distribute-rgt-inN/A
*-lft-identityN/A
lower-fma.f3299.5
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lower-neg.f32N/A
lower-/.f3299.5
Applied rewrites99.5%
lift-exp.f32N/A
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lift-/.f32N/A
neg-mul-1N/A
exp-prodN/A
lower-pow.f32N/A
lower-exp.f3299.5
Applied rewrites99.5%
Applied rewrites99.5%
Final simplification99.5%
(FPCore (x s) :precision binary32 (/ -1.0 (* (fma s (exp (/ (fabs x) (- s))) s) (- -1.0 (exp (/ (fabs x) s))))))
float code(float x, float s) {
return -1.0f / (fmaf(s, expf((fabsf(x) / -s)), s) * (-1.0f - expf((fabsf(x) / s))));
}
function code(x, s) return Float32(Float32(-1.0) / Float32(fma(s, exp(Float32(abs(x) / Float32(-s))), s) * Float32(Float32(-1.0) - exp(Float32(abs(x) / s))))) end
\begin{array}{l}
\\
\frac{-1}{\mathsf{fma}\left(s, e^{\frac{\left|x\right|}{-s}}, s\right) \cdot \left(-1 - e^{\frac{\left|x\right|}{s}}\right)}
\end{array}
Initial program 99.5%
lift-/.f32N/A
clear-numN/A
lift-*.f32N/A
associate-/l*N/A
associate-/r*N/A
lower-/.f32N/A
Applied rewrites99.4%
Taylor expanded in s around 0
associate-*r*N/A
associate-/r*N/A
associate-/l/N/A
exp-negN/A
neg-mul-1N/A
unpow2N/A
neg-mul-1N/A
associate-/r*N/A
Applied rewrites99.5%
Final simplification99.5%
(FPCore (x s) :precision binary32 (/ (/ (/ 1.0 (fma 1.0 (exp (/ (- s 0.0) (* s (/ s (fabs x))))) 1.0)) s) 2.0))
float code(float x, float s) {
return ((1.0f / fmaf(1.0f, expf(((s - 0.0f) / (s * (s / fabsf(x))))), 1.0f)) / s) / 2.0f;
}
function code(x, s) return Float32(Float32(Float32(Float32(1.0) / fma(Float32(1.0), exp(Float32(Float32(s - Float32(0.0)) / Float32(s * Float32(s / abs(x))))), Float32(1.0))) / s) / Float32(2.0)) end
\begin{array}{l}
\\
\frac{\frac{\frac{1}{\mathsf{fma}\left(1, e^{\frac{s - 0}{s \cdot \frac{s}{\left|x\right|}}}, 1\right)}}{s}}{2}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
Applied rewrites94.9%
lift-/.f32N/A
frac-2negN/A
neg-sub0N/A
div-subN/A
distribute-neg-frac2N/A
clear-numN/A
distribute-neg-fracN/A
metadata-evalN/A
frac-subN/A
lower-/.f32N/A
lower--.f32N/A
lower-*.f32N/A
lower-/.f32N/A
lower-*.f32N/A
lower-neg.f32N/A
lower-*.f32N/A
lower-neg.f32N/A
lower-/.f3294.9
Applied rewrites94.9%
Taylor expanded in s around 0
Applied rewrites94.9%
Final simplification94.9%
(FPCore (x s) :precision binary32 (/ (/ (/ 1.0 (fma 1.0 (exp (* (fabs x) (/ 1.0 s))) 1.0)) s) 2.0))
float code(float x, float s) {
return ((1.0f / fmaf(1.0f, expf((fabsf(x) * (1.0f / s))), 1.0f)) / s) / 2.0f;
}
function code(x, s) return Float32(Float32(Float32(Float32(1.0) / fma(Float32(1.0), exp(Float32(abs(x) * Float32(Float32(1.0) / s))), Float32(1.0))) / s) / Float32(2.0)) end
\begin{array}{l}
\\
\frac{\frac{\frac{1}{\mathsf{fma}\left(1, e^{\left|x\right| \cdot \frac{1}{s}}, 1\right)}}{s}}{2}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
Applied rewrites94.9%
lift-/.f32N/A
clear-numN/A
associate-/r/N/A
lower-*.f32N/A
lower-/.f3294.9
Applied rewrites94.9%
Final simplification94.9%
(FPCore (x s) :precision binary32 (/ (/ -1.0 (- -1.0 (exp (/ (fabs x) s)))) (* s 2.0)))
float code(float x, float s) {
return (-1.0f / (-1.0f - expf((fabsf(x) / s)))) / (s * 2.0f);
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = ((-1.0e0) / ((-1.0e0) - exp((abs(x) / s)))) / (s * 2.0e0)
end function
function code(x, s) return Float32(Float32(Float32(-1.0) / Float32(Float32(-1.0) - exp(Float32(abs(x) / s)))) / Float32(s * Float32(2.0))) end
function tmp = code(x, s) tmp = (single(-1.0) / (single(-1.0) - exp((abs(x) / s)))) / (s * single(2.0)); end
\begin{array}{l}
\\
\frac{\frac{-1}{-1 - e^{\frac{\left|x\right|}{s}}}}{s \cdot 2}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
Applied rewrites94.9%
lift-/.f32N/A
lift-/.f32N/A
associate-/l/N/A
lower-/.f32N/A
lift-fma.f32N/A
*-lft-identityN/A
+-commutativeN/A
lift-+.f32N/A
*-commutativeN/A
lower-*.f3294.9
Applied rewrites94.9%
Final simplification94.9%
(FPCore (x s) :precision binary32 (/ 1.0 (* (fma s (exp (/ (fabs x) s)) s) 2.0)))
float code(float x, float s) {
return 1.0f / (fmaf(s, expf((fabsf(x) / s)), s) * 2.0f);
}
function code(x, s) return Float32(Float32(1.0) / Float32(fma(s, exp(Float32(abs(x) / s)), s) * Float32(2.0))) end
\begin{array}{l}
\\
\frac{1}{\mathsf{fma}\left(s, e^{\frac{\left|x\right|}{s}}, s\right) \cdot 2}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
Applied rewrites94.9%
lift-/.f32N/A
div-invN/A
lift-/.f32N/A
lift-/.f32N/A
associate-/l/N/A
lift-fma.f32N/A
*-lft-identityN/A
+-commutativeN/A
lift-+.f32N/A
frac-timesN/A
metadata-evalN/A
Applied rewrites94.8%
(FPCore (x s) :precision binary32 (/ (exp (/ (fabs x) (- s))) (* s 4.0)))
float code(float x, float s) {
return expf((fabsf(x) / -s)) / (s * 4.0f);
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = exp((abs(x) / -s)) / (s * 4.0e0)
end function
function code(x, s) return Float32(exp(Float32(abs(x) / Float32(-s))) / Float32(s * Float32(4.0))) end
function tmp = code(x, s) tmp = exp((abs(x) / -s)) / (s * single(4.0)); end
\begin{array}{l}
\\
\frac{e^{\frac{\left|x\right|}{-s}}}{s \cdot 4}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
*-commutativeN/A
lower-*.f3294.5
Applied rewrites94.5%
Final simplification94.5%
(FPCore (x s)
:precision binary32
(let* ((t_0 (/ (fabs x) s)) (t_1 (- (fabs x))) (t_2 (/ 0.5 (* s s))))
(if (<= t_1 -2.20000002915631e-14)
(/
(/
(/
1.0
(+
(fma (* x x) t_2 t_0)
(fma (/ (* (fabs x) (* x x)) (* s (* s s))) 0.16666666666666666 2.0)))
s)
2.0)
(if (<= t_1 -4.00000012549758e-22)
(/ (/ (/ 1.0 (+ t_0 (fma (* x x) t_2 2.0))) s) 2.0)
(/ (fma (/ x s) (/ (* x -0.0625) s) 0.25) s)))))
float code(float x, float s) {
float t_0 = fabsf(x) / s;
float t_1 = -fabsf(x);
float t_2 = 0.5f / (s * s);
float tmp;
if (t_1 <= -2.20000002915631e-14f) {
tmp = ((1.0f / (fmaf((x * x), t_2, t_0) + fmaf(((fabsf(x) * (x * x)) / (s * (s * s))), 0.16666666666666666f, 2.0f))) / s) / 2.0f;
} else if (t_1 <= -4.00000012549758e-22f) {
tmp = ((1.0f / (t_0 + fmaf((x * x), t_2, 2.0f))) / s) / 2.0f;
} else {
tmp = fmaf((x / s), ((x * -0.0625f) / s), 0.25f) / s;
}
return tmp;
}
function code(x, s) t_0 = Float32(abs(x) / s) t_1 = Float32(-abs(x)) t_2 = Float32(Float32(0.5) / Float32(s * s)) tmp = Float32(0.0) if (t_1 <= Float32(-2.20000002915631e-14)) tmp = Float32(Float32(Float32(Float32(1.0) / Float32(fma(Float32(x * x), t_2, t_0) + fma(Float32(Float32(abs(x) * Float32(x * x)) / Float32(s * Float32(s * s))), Float32(0.16666666666666666), Float32(2.0)))) / s) / Float32(2.0)); elseif (t_1 <= Float32(-4.00000012549758e-22)) tmp = Float32(Float32(Float32(Float32(1.0) / Float32(t_0 + fma(Float32(x * x), t_2, Float32(2.0)))) / s) / Float32(2.0)); else tmp = Float32(fma(Float32(x / s), Float32(Float32(x * Float32(-0.0625)) / s), Float32(0.25)) / s); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{\left|x\right|}{s}\\
t_1 := -\left|x\right|\\
t_2 := \frac{0.5}{s \cdot s}\\
\mathbf{if}\;t\_1 \leq -2.20000002915631 \cdot 10^{-14}:\\
\;\;\;\;\frac{\frac{\frac{1}{\mathsf{fma}\left(x \cdot x, t\_2, t\_0\right) + \mathsf{fma}\left(\frac{\left|x\right| \cdot \left(x \cdot x\right)}{s \cdot \left(s \cdot s\right)}, 0.16666666666666666, 2\right)}}{s}}{2}\\
\mathbf{elif}\;t\_1 \leq -4.00000012549758 \cdot 10^{-22}:\\
\;\;\;\;\frac{\frac{\frac{1}{t\_0 + \mathsf{fma}\left(x \cdot x, t\_2, 2\right)}}{s}}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\mathsf{fma}\left(\frac{x}{s}, \frac{x \cdot -0.0625}{s}, 0.25\right)}{s}\\
\end{array}
\end{array}
if (neg.f32 (fabs.f32 x)) < -2.20000003e-14Initial program 99.9%
Taylor expanded in s around inf
Applied rewrites97.4%
Applied rewrites97.4%
Taylor expanded in s around inf
associate-+r+N/A
+-commutativeN/A
lower-+.f32N/A
associate-*r/N/A
*-commutativeN/A
associate-/l*N/A
lower-fma.f32N/A
unpow2N/A
sqr-absN/A
lower-*.f32N/A
lower-/.f32N/A
unpow2N/A
lower-*.f32N/A
lower-/.f32N/A
lower-fabs.f32N/A
+-commutativeN/A
Applied rewrites88.4%
if -2.20000003e-14 < (neg.f32 (fabs.f32 x)) < -4.00000013e-22Initial program 99.6%
Taylor expanded in s around inf
Applied rewrites90.4%
Applied rewrites90.6%
Taylor expanded in s around inf
associate-+r+N/A
+-commutativeN/A
lower-+.f32N/A
lower-/.f32N/A
lower-fabs.f32N/A
+-commutativeN/A
associate-*r/N/A
*-commutativeN/A
associate-/l*N/A
lower-fma.f32N/A
unpow2N/A
sqr-absN/A
lower-*.f32N/A
lower-/.f32N/A
unpow2N/A
lower-*.f3290.7
Applied rewrites90.7%
if -4.00000013e-22 < (neg.f32 (fabs.f32 x)) Initial program 97.8%
Taylor expanded in s around inf
lower-/.f32N/A
Applied rewrites47.3%
Applied rewrites78.7%
(FPCore (x s)
:precision binary32
(/
(/
(/
1.0
(+
2.0
(/
(+
(fabs x)
(/
(fma 0.16666666666666666 (* (fabs x) (/ (* x x) s)) (* (* x x) 0.5))
s))
s)))
s)
2.0))
float code(float x, float s) {
return ((1.0f / (2.0f + ((fabsf(x) + (fmaf(0.16666666666666666f, (fabsf(x) * ((x * x) / s)), ((x * x) * 0.5f)) / s)) / s))) / s) / 2.0f;
}
function code(x, s) return Float32(Float32(Float32(Float32(1.0) / Float32(Float32(2.0) + Float32(Float32(abs(x) + Float32(fma(Float32(0.16666666666666666), Float32(abs(x) * Float32(Float32(x * x) / s)), Float32(Float32(x * x) * Float32(0.5))) / s)) / s))) / s) / Float32(2.0)) end
\begin{array}{l}
\\
\frac{\frac{\frac{1}{2 + \frac{\left|x\right| + \frac{\mathsf{fma}\left(0.16666666666666666, \left|x\right| \cdot \frac{x \cdot x}{s}, \left(x \cdot x\right) \cdot 0.5\right)}{s}}{s}}}{s}}{2}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
Applied rewrites94.9%
Taylor expanded in s around -inf
mul-1-negN/A
unsub-negN/A
lower--.f32N/A
lower-/.f32N/A
Applied rewrites79.3%
Final simplification79.3%
(FPCore (x s) :precision binary32 (/ (/ (/ 1.0 (+ (/ (fabs x) s) 2.0)) s) 2.0))
float code(float x, float s) {
return ((1.0f / ((fabsf(x) / s) + 2.0f)) / s) / 2.0f;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = ((1.0e0 / ((abs(x) / s) + 2.0e0)) / s) / 2.0e0
end function
function code(x, s) return Float32(Float32(Float32(Float32(1.0) / Float32(Float32(abs(x) / s) + Float32(2.0))) / s) / Float32(2.0)) end
function tmp = code(x, s) tmp = ((single(1.0) / ((abs(x) / s) + single(2.0))) / s) / single(2.0); end
\begin{array}{l}
\\
\frac{\frac{\frac{1}{\frac{\left|x\right|}{s} + 2}}{s}}{2}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
Applied rewrites94.9%
Taylor expanded in s around inf
+-commutativeN/A
lower-+.f32N/A
lower-/.f32N/A
lower-fabs.f3248.9
Applied rewrites48.9%
(FPCore (x s) :precision binary32 (/ 1.0 (* s (- (/ (/ (* x x) s) s) -4.0))))
float code(float x, float s) {
return 1.0f / (s * ((((x * x) / s) / s) - -4.0f));
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 1.0e0 / (s * ((((x * x) / s) / s) - (-4.0e0)))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(s * Float32(Float32(Float32(Float32(x * x) / s) / s) - Float32(-4.0)))) end
function tmp = code(x, s) tmp = single(1.0) / (s * ((((x * x) / s) / s) - single(-4.0))); end
\begin{array}{l}
\\
\frac{1}{s \cdot \left(\frac{\frac{x \cdot x}{s}}{s} - -4\right)}
\end{array}
Initial program 99.5%
lift-/.f32N/A
clear-numN/A
lift-*.f32N/A
associate-/l*N/A
associate-/r*N/A
lower-/.f32N/A
Applied rewrites99.4%
Taylor expanded in s around 0
associate-*r*N/A
associate-/r*N/A
associate-/l/N/A
exp-negN/A
neg-mul-1N/A
unpow2N/A
neg-mul-1N/A
associate-/r*N/A
Applied rewrites99.5%
Taylor expanded in s around -inf
Applied rewrites73.2%
Final simplification73.2%
(FPCore (x s) :precision binary32 (/ (fma (/ x s) (/ (* x -0.0625) s) 0.25) s))
float code(float x, float s) {
return fmaf((x / s), ((x * -0.0625f) / s), 0.25f) / s;
}
function code(x, s) return Float32(fma(Float32(x / s), Float32(Float32(x * Float32(-0.0625)) / s), Float32(0.25)) / s) end
\begin{array}{l}
\\
\frac{\mathsf{fma}\left(\frac{x}{s}, \frac{x \cdot -0.0625}{s}, 0.25\right)}{s}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
lower-/.f32N/A
Applied rewrites19.2%
Applied rewrites25.1%
(FPCore (x s) :precision binary32 (/ 0.25 s))
float code(float x, float s) {
return 0.25f / s;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 0.25e0 / s
end function
function code(x, s) return Float32(Float32(0.25) / s) end
function tmp = code(x, s) tmp = single(0.25) / s; end
\begin{array}{l}
\\
\frac{0.25}{s}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
lower-/.f3225.1
Applied rewrites25.1%
herbie shell --seed 2024232
(FPCore (x s)
:name "Logistic distribution"
:precision binary32
:pre (and (<= 0.0 s) (<= s 1.0651631))
(/ (exp (/ (- (fabs x)) s)) (* (* s (+ 1.0 (exp (/ (- (fabs x)) s)))) (+ 1.0 (exp (/ (- (fabs x)) s))))))