
(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 14 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 (exp (/ (fabs x) (- s))))) (/ (* (pow (+ 1.0 t_0) -2.0) t_0) s)))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
return (powf((1.0f + t_0), -2.0f) * t_0) / s;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
t_0 = exp((abs(x) / -s))
code = (((1.0e0 + t_0) ** (-2.0e0)) * t_0) / s
end function
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) return Float32(Float32((Float32(Float32(1.0) + t_0) ^ Float32(-2.0)) * t_0) / s) end
function tmp = code(x, s) t_0 = exp((abs(x) / -s)); tmp = (((single(1.0) + t_0) ^ single(-2.0)) * t_0) / s; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
\frac{{\left(1 + t\_0\right)}^{-2} \cdot t\_0}{s}
\end{array}
\end{array}
Initial program 99.7%
Applied rewrites99.8%
lift-*.f32N/A
lift-exp.f32N/A
lift-neg.f32N/A
exp-negN/A
lift-exp.f32N/A
un-div-invN/A
lower-/.f3299.8
Applied rewrites99.8%
lift-/.f32N/A
div-invN/A
lift-exp.f32N/A
exp-negN/A
lift-/.f32N/A
distribute-frac-negN/A
lift-neg.f32N/A
lift-/.f32N/A
lift-exp.f32N/A
lower-*.f3299.8
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lift-/.f32N/A
lift-neg.f3299.8
Applied rewrites99.8%
Final simplification99.8%
(FPCore (x s)
:precision binary32
(let* ((t_0 (exp (/ (fabs x) (- s)))) (t_1 (+ 1.0 t_0)))
(if (<= (/ t_0 (* t_1 (* s t_1))) 200000000753664.0)
(/ 1.0 (* s (fma x (/ x (* s s)) 4.0)))
(/ (fma (/ (* x -0.0625) s) (/ x s) 0.25) s))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
float t_1 = 1.0f + t_0;
float tmp;
if ((t_0 / (t_1 * (s * t_1))) <= 200000000753664.0f) {
tmp = 1.0f / (s * fmaf(x, (x / (s * s)), 4.0f));
} else {
tmp = fmaf(((x * -0.0625f) / s), (x / s), 0.25f) / s;
}
return tmp;
}
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) t_1 = Float32(Float32(1.0) + t_0) tmp = Float32(0.0) if (Float32(t_0 / Float32(t_1 * Float32(s * t_1))) <= Float32(200000000753664.0)) tmp = Float32(Float32(1.0) / Float32(s * fma(x, Float32(x / Float32(s * s)), Float32(4.0)))); else tmp = Float32(fma(Float32(Float32(x * Float32(-0.0625)) / s), Float32(x / 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 := 1 + t\_0\\
\mathbf{if}\;\frac{t\_0}{t\_1 \cdot \left(s \cdot t\_1\right)} \leq 200000000753664:\\
\;\;\;\;\frac{1}{s \cdot \mathsf{fma}\left(x, \frac{x}{s \cdot s}, 4\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{\mathsf{fma}\left(\frac{x \cdot -0.0625}{s}, \frac{x}{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))))) < 2.00000001e14Initial program 99.8%
lift-/.f32N/A
clear-numN/A
lower-/.f32N/A
lift-*.f32N/A
lift-*.f32N/A
associate-*l*N/A
associate-/l*N/A
lower-*.f32N/A
Applied rewrites99.8%
Taylor expanded in s around -inf
Applied rewrites38.9%
Taylor expanded in s around inf
Applied rewrites86.9%
if 2.00000001e14 < (/.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 98.9%
Applied rewrites99.6%
lift-*.f32N/A
lift-exp.f32N/A
lift-neg.f32N/A
exp-negN/A
lift-exp.f32N/A
un-div-invN/A
lower-/.f3299.7
Applied rewrites99.7%
Taylor expanded in s around inf
Applied rewrites35.7%
Applied rewrites88.7%
Final simplification87.1%
(FPCore (x s)
:precision binary32
(let* ((t_0 (exp (/ (fabs x) (- s)))) (t_1 (+ 1.0 t_0)))
(if (<= (/ t_0 (* t_1 (* s t_1))) 9.999999778196308e+21)
(/ 1.0 (* s (fma x (/ x (* s s)) 4.0)))
(/ 0.25 s))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
float t_1 = 1.0f + t_0;
float tmp;
if ((t_0 / (t_1 * (s * t_1))) <= 9.999999778196308e+21f) {
tmp = 1.0f / (s * fmaf(x, (x / (s * s)), 4.0f));
} else {
tmp = 0.25f / s;
}
return tmp;
}
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) t_1 = Float32(Float32(1.0) + t_0) tmp = Float32(0.0) if (Float32(t_0 / Float32(t_1 * Float32(s * t_1))) <= Float32(9.999999778196308e+21)) tmp = Float32(Float32(1.0) / Float32(s * fma(x, Float32(x / Float32(s * s)), Float32(4.0)))); else tmp = Float32(Float32(0.25) / s); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
t_1 := 1 + t\_0\\
\mathbf{if}\;\frac{t\_0}{t\_1 \cdot \left(s \cdot t\_1\right)} \leq 9.999999778196308 \cdot 10^{+21}:\\
\;\;\;\;\frac{1}{s \cdot \mathsf{fma}\left(x, \frac{x}{s \cdot s}, 4\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{0.25}{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))))) < 9.99999978e21Initial program 99.7%
lift-/.f32N/A
clear-numN/A
lower-/.f32N/A
lift-*.f32N/A
lift-*.f32N/A
associate-*l*N/A
associate-/l*N/A
lower-*.f32N/A
Applied rewrites99.8%
Taylor expanded in s around -inf
Applied rewrites42.2%
Taylor expanded in s around inf
Applied rewrites87.5%
if 9.99999978e21 < (/.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 98.6%
Taylor expanded in s around inf
lower-/.f3272.9
Applied rewrites72.9%
Final simplification86.7%
(FPCore (x s) :precision binary32 (let* ((t_0 (/ (fabs x) (- s)))) (/ (exp (fma -2.0 (log1p (exp t_0)) t_0)) s)))
float code(float x, float s) {
float t_0 = fabsf(x) / -s;
return expf(fmaf(-2.0f, log1pf(expf(t_0)), t_0)) / s;
}
function code(x, s) t_0 = Float32(abs(x) / Float32(-s)) return Float32(exp(fma(Float32(-2.0), log1p(exp(t_0)), t_0)) / s) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{\left|x\right|}{-s}\\
\frac{e^{\mathsf{fma}\left(-2, \mathsf{log1p}\left(e^{t\_0}\right), t\_0\right)}}{s}
\end{array}
\end{array}
Initial program 99.7%
Applied rewrites99.8%
Applied rewrites99.8%
Final simplification99.8%
(FPCore (x s)
:precision binary32
(let* ((t_0 (exp (/ (fabs x) (- s)))))
(/
t_0
(*
(*
s
(-
(- -2.0)
(/
(fma
x
(* x (/ (fma (/ (fabs x) s) 0.16666666666666666 -0.5) s))
(fabs x))
s)))
(+ 1.0 t_0)))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
return t_0 / ((s * (-(-2.0f) - (fmaf(x, (x * (fmaf((fabsf(x) / s), 0.16666666666666666f, -0.5f) / s)), fabsf(x)) / s))) * (1.0f + t_0));
}
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) return Float32(t_0 / Float32(Float32(s * Float32(Float32(-Float32(-2.0)) - Float32(fma(x, Float32(x * Float32(fma(Float32(abs(x) / s), Float32(0.16666666666666666), Float32(-0.5)) / s)), abs(x)) / s))) * Float32(Float32(1.0) + t_0))) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
\frac{t\_0}{\left(s \cdot \left(\left(--2\right) - \frac{\mathsf{fma}\left(x, x \cdot \frac{\mathsf{fma}\left(\frac{\left|x\right|}{s}, 0.16666666666666666, -0.5\right)}{s}, \left|x\right|\right)}{s}\right)\right) \cdot \left(1 + t\_0\right)}
\end{array}
\end{array}
Initial program 99.7%
Taylor expanded in s around inf
*-commutativeN/A
lower-*.f3294.6
Applied rewrites94.6%
Taylor expanded in s around -inf
Applied rewrites96.6%
Final simplification96.6%
(FPCore (x s)
:precision binary32
(let* ((t_0 (exp (/ (fabs x) (- s)))))
(/
t_0
(* (+ 1.0 t_0) (* s (- 2.0 (/ (fma (/ (* x x) s) -0.5 (fabs x)) s)))))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
return t_0 / ((1.0f + t_0) * (s * (2.0f - (fmaf(((x * x) / s), -0.5f, fabsf(x)) / s))));
}
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) return Float32(t_0 / Float32(Float32(Float32(1.0) + t_0) * Float32(s * Float32(Float32(2.0) - Float32(fma(Float32(Float32(x * x) / s), Float32(-0.5), abs(x)) / s))))) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
\frac{t\_0}{\left(1 + t\_0\right) \cdot \left(s \cdot \left(2 - \frac{\mathsf{fma}\left(\frac{x \cdot x}{s}, -0.5, \left|x\right|\right)}{s}\right)\right)}
\end{array}
\end{array}
Initial program 99.7%
Taylor expanded in s around inf
lower-*.f32N/A
lower-+.f32N/A
+-commutativeN/A
mul-1-negN/A
unsub-negN/A
associate-*r/N/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
div-subN/A
unsub-negN/A
mul-1-negN/A
+-commutativeN/A
Applied rewrites96.0%
Final simplification96.0%
(FPCore (x s) :precision binary32 (let* ((t_0 (exp (/ (fabs x) (- s))))) (/ t_0 (* (* s (+ 1.0 t_0)) (+ 1.0 (- 1.0 (/ (fabs x) s)))))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
return t_0 / ((s * (1.0f + t_0)) * (1.0f + (1.0f - (fabsf(x) / s))));
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
t_0 = exp((abs(x) / -s))
code = t_0 / ((s * (1.0e0 + t_0)) * (1.0e0 + (1.0e0 - (abs(x) / s))))
end function
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) return Float32(t_0 / Float32(Float32(s * Float32(Float32(1.0) + t_0)) * Float32(Float32(1.0) + Float32(Float32(1.0) - Float32(abs(x) / s))))) end
function tmp = code(x, s) t_0 = exp((abs(x) / -s)); tmp = t_0 / ((s * (single(1.0) + t_0)) * (single(1.0) + (single(1.0) - (abs(x) / s)))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
\frac{t\_0}{\left(s \cdot \left(1 + t\_0\right)\right) \cdot \left(1 + \left(1 - \frac{\left|x\right|}{s}\right)\right)}
\end{array}
\end{array}
Initial program 99.7%
Taylor expanded in s around inf
mul-1-negN/A
unsub-negN/A
lower--.f32N/A
lower-/.f32N/A
lower-fabs.f3295.4
Applied rewrites95.4%
Final simplification95.4%
(FPCore (x s) :precision binary32 (/ 1.0 (* (exp (/ (fabs x) s)) (* (+ 1.0 (exp (/ (fabs x) (- s)))) (* s 2.0)))))
float code(float x, float s) {
return 1.0f / (expf((fabsf(x) / s)) * ((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 / (exp((abs(x) / s)) * ((1.0e0 + exp((abs(x) / -s))) * (s * 2.0e0)))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(exp(Float32(abs(x) / s)) * Float32(Float32(Float32(1.0) + exp(Float32(abs(x) / Float32(-s)))) * Float32(s * Float32(2.0))))) end
function tmp = code(x, s) tmp = single(1.0) / (exp((abs(x) / s)) * ((single(1.0) + exp((abs(x) / -s))) * (s * single(2.0)))); end
\begin{array}{l}
\\
\frac{1}{e^{\frac{\left|x\right|}{s}} \cdot \left(\left(1 + e^{\frac{\left|x\right|}{-s}}\right) \cdot \left(s \cdot 2\right)\right)}
\end{array}
Initial program 99.7%
Taylor expanded in s around inf
*-commutativeN/A
lower-*.f3294.6
Applied rewrites94.6%
lift-/.f32N/A
clear-numN/A
lower-/.f32N/A
div-invN/A
lift-exp.f32N/A
rec-expN/A
lift-/.f32N/A
distribute-frac-neg2N/A
lift-neg.f32N/A
frac-2negN/A
lift-/.f32N/A
Applied rewrites94.6%
Final simplification94.6%
(FPCore (x s) :precision binary32 (let* ((t_0 (/ (fabs x) (- s)))) (/ (pow E t_0) (* (+ 1.0 (exp t_0)) (* s 2.0)))))
float code(float x, float s) {
float t_0 = fabsf(x) / -s;
return powf(((float) M_E), t_0) / ((1.0f + expf(t_0)) * (s * 2.0f));
}
function code(x, s) t_0 = Float32(abs(x) / Float32(-s)) return Float32((Float32(exp(1)) ^ t_0) / Float32(Float32(Float32(1.0) + exp(t_0)) * Float32(s * Float32(2.0)))) end
function tmp = code(x, s) t_0 = abs(x) / -s; tmp = (single(2.71828182845904523536) ^ t_0) / ((single(1.0) + exp(t_0)) * (s * single(2.0))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{\left|x\right|}{-s}\\
\frac{{e}^{t\_0}}{\left(1 + e^{t\_0}\right) \cdot \left(s \cdot 2\right)}
\end{array}
\end{array}
Initial program 99.7%
Taylor expanded in s around inf
*-commutativeN/A
lower-*.f3294.6
Applied rewrites94.6%
lift-/.f32N/A
clear-numN/A
associate-/r/N/A
lower-*.f32N/A
lower-/.f3294.6
Applied rewrites94.6%
lift-exp.f32N/A
lift-*.f32N/A
lift-/.f32N/A
associate-*l/N/A
associate-/l*N/A
lift-/.f32N/A
exp-prodN/A
lower-pow.f32N/A
exp-1-eN/A
lower-E.f3294.6
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lift-/.f32N/A
lift-neg.f3294.6
Applied rewrites94.6%
Final simplification94.6%
(FPCore (x s) :precision binary32 (let* ((t_0 (exp (/ (fabs x) (- s))))) (/ t_0 (* (+ 1.0 t_0) (* s 2.0)))))
float code(float x, float s) {
float t_0 = expf((fabsf(x) / -s));
return t_0 / ((1.0f + t_0) * (s * 2.0f));
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
t_0 = exp((abs(x) / -s))
code = t_0 / ((1.0e0 + t_0) * (s * 2.0e0))
end function
function code(x, s) t_0 = exp(Float32(abs(x) / Float32(-s))) return Float32(t_0 / Float32(Float32(Float32(1.0) + t_0) * Float32(s * Float32(2.0)))) end
function tmp = code(x, s) t_0 = exp((abs(x) / -s)); tmp = t_0 / ((single(1.0) + t_0) * (s * single(2.0))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := e^{\frac{\left|x\right|}{-s}}\\
\frac{t\_0}{\left(1 + t\_0\right) \cdot \left(s \cdot 2\right)}
\end{array}
\end{array}
Initial program 99.7%
Taylor expanded in s around inf
*-commutativeN/A
lower-*.f3294.6
Applied rewrites94.6%
Final simplification94.6%
(FPCore (x s) :precision binary32 (/ (exp (* (fabs x) (/ -1.0 s))) (* s 4.0)))
float code(float x, float s) {
return expf((fabsf(x) * (-1.0f / s))) / (s * 4.0f);
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = exp((abs(x) * ((-1.0e0) / s))) / (s * 4.0e0)
end function
function code(x, s) return Float32(exp(Float32(abs(x) * Float32(Float32(-1.0) / s))) / Float32(s * Float32(4.0))) end
function tmp = code(x, s) tmp = exp((abs(x) * (single(-1.0) / s))) / (s * single(4.0)); end
\begin{array}{l}
\\
\frac{e^{\left|x\right| \cdot \frac{-1}{s}}}{s \cdot 4}
\end{array}
Initial program 99.7%
Taylor expanded in s around inf
*-commutativeN/A
lower-*.f3294.6
Applied rewrites94.6%
lift-/.f32N/A
clear-numN/A
associate-/r/N/A
lower-*.f32N/A
lower-/.f3294.6
Applied rewrites94.6%
lift-*.f32N/A
lift-neg.f32N/A
distribute-rgt-neg-outN/A
distribute-lft-neg-inN/A
lift-/.f32N/A
distribute-frac-neg2N/A
lift-neg.f32N/A
lower-*.f32N/A
lift-neg.f32N/A
neg-mul-1N/A
associate-/r*N/A
metadata-evalN/A
lower-/.f3294.6
Applied rewrites94.6%
Taylor expanded in s around inf
*-commutativeN/A
lower-*.f3294.2
Applied rewrites94.2%
Final simplification94.2%
(FPCore (x s) :precision binary32 (/ (* (pow E (/ (fabs x) (- s))) 0.25) s))
float code(float x, float s) {
return (powf(((float) M_E), (fabsf(x) / -s)) * 0.25f) / s;
}
function code(x, s) return Float32(Float32((Float32(exp(1)) ^ Float32(abs(x) / Float32(-s))) * Float32(0.25)) / s) end
function tmp = code(x, s) tmp = ((single(2.71828182845904523536) ^ (abs(x) / -s)) * single(0.25)) / s; end
\begin{array}{l}
\\
\frac{{e}^{\left(\frac{\left|x\right|}{-s}\right)} \cdot 0.25}{s}
\end{array}
Initial program 99.7%
Applied rewrites99.8%
Taylor expanded in s around inf
Applied rewrites94.2%
lift-exp.f32N/A
lift-neg.f32N/A
lift-/.f32N/A
distribute-frac-negN/A
lift-neg.f32N/A
*-lft-identityN/A
associate-/l*N/A
lift-/.f32N/A
exp-prodN/A
lower-pow.f32N/A
exp-1-eN/A
lower-E.f3294.2
lift-/.f32N/A
lift-neg.f32N/A
distribute-frac-negN/A
lift-/.f32N/A
lift-neg.f3294.2
Applied rewrites94.2%
Final simplification94.2%
(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.7%
Taylor expanded in s around inf
*-commutativeN/A
lower-*.f3294.2
Applied rewrites94.2%
Final simplification94.2%
(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.7%
Taylor expanded in s around inf
lower-/.f3230.4
Applied rewrites30.4%
herbie shell --seed 2024233
(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))))))