\frac{e^{\frac{-\left|x\right|}{s}}}{\left(s \cdot \left(1 + e^{\frac{-\left|x\right|}{s}}\right)\right) \cdot \left(1 + e^{\frac{-\left|x\right|}{s}}\right)}
\begin{array}{l}
t_0 := \frac{\left|x\right|}{s}\\
\frac{1}{s} \cdot \frac{1}{e^{t_0} + \left(2 + e^{-t_0}\right)}
\end{array}
(FPCore (x s) :precision binary32 (/ (exp (/ (- (fabs x)) s)) (* (* s (+ 1.0 (exp (/ (- (fabs x)) s)))) (+ 1.0 (exp (/ (- (fabs x)) s))))))
(FPCore (x s) :precision binary32 (let* ((t_0 (/ (fabs x) s))) (* (/ 1.0 s) (/ 1.0 (+ (exp t_0) (+ 2.0 (exp (- t_0))))))))
float code(float x, float s) {
return expf(-fabsf(x) / s) / ((s * (1.0f + expf(-fabsf(x) / s))) * (1.0f + expf(-fabsf(x) / s)));
}
float code(float x, float s) {
float t_0 = fabsf(x) / s;
return (1.0f / s) * (1.0f / (expf(t_0) + (2.0f + expf(-t_0))));
}



Bits error versus x



Bits error versus s
Results
Initial program 0.1
Simplified0.2
rmApplied div-inv_binary320.2
Simplified0.2
Final simplification0.2
herbie shell --seed 2021206
(FPCore (x s)
:name "Logistic distribution"
:precision binary32
:pre (<= 0.0 s 1.0651631)
(/ (exp (/ (- (fabs x)) s)) (* (* s (+ 1.0 (exp (/ (- (fabs x)) s)))) (+ 1.0 (exp (/ (- (fabs x)) s))))))