\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 := e^{-\frac{\left|x\right|}{s}}\\
\frac{1}{\frac{s \cdot {\left(1 + t_0\right)}^{2}}{t_0}}
\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 (exp (- (/ (fabs x) s))))) (/ 1.0 (/ (* s (pow (+ 1.0 t_0) 2.0)) 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 = expf(-(fabsf(x) / s));
return 1.0f / ((s * powf((1.0f + t_0), 2.0f)) / t_0);
}



Bits error versus x



Bits error versus s
Results
Initial program 0.1
Applied clear-num_binary320.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2022067
(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))))))