
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (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)
use fmin_fmax_functions
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}
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}
Herbie found 13 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (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)
use fmin_fmax_functions
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}
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}
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (let* ((t_0 (/ (fabs x) s))) (/ 1.0 (* (- (exp (- t_0)) -1.0) (* s (+ (exp t_0) 1.0))))))
float code(float x, float s) {
float t_0 = fabsf(x) / s;
return 1.0f / ((expf(-t_0) - -1.0f) * (s * (expf(t_0) + 1.0f)));
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
t_0 = abs(x) / s
code = 1.0e0 / ((exp(-t_0) - (-1.0e0)) * (s * (exp(t_0) + 1.0e0)))
end function
function code(x, s) t_0 = Float32(abs(x) / s) return Float32(Float32(1.0) / Float32(Float32(exp(Float32(-t_0)) - Float32(-1.0)) * Float32(s * Float32(exp(t_0) + Float32(1.0))))) end
function tmp = code(x, s) t_0 = abs(x) / s; tmp = single(1.0) / ((exp(-t_0) - single(-1.0)) * (s * (exp(t_0) + single(1.0)))); end
\begin{array}{l}
t_0 := \frac{\left|x\right|}{s}\\
\frac{1}{\left(e^{-t\_0} - -1\right) \cdot \left(s \cdot \left(e^{t\_0} + 1\right)\right)}
\end{array}
Initial program 99.5%
Applied rewrites99.5%
Applied rewrites99.5%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (let* ((t_0 (/ (fabs x) s))) (/ 1.0 (* (+ (exp t_0) 1.0) (fma s (exp (- t_0)) s)))))
float code(float x, float s) {
float t_0 = fabsf(x) / s;
return 1.0f / ((expf(t_0) + 1.0f) * fmaf(s, expf(-t_0), s));
}
function code(x, s) t_0 = Float32(abs(x) / s) return Float32(Float32(1.0) / Float32(Float32(exp(t_0) + Float32(1.0)) * fma(s, exp(Float32(-t_0)), s))) end
\begin{array}{l}
t_0 := \frac{\left|x\right|}{s}\\
\frac{1}{\left(e^{t\_0} + 1\right) \cdot \mathsf{fma}\left(s, e^{-t\_0}, s\right)}
\end{array}
Initial program 99.5%
Applied rewrites99.6%
Applied rewrites99.5%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (let* ((t_0 (exp (/ (- (fabs x)) s)))) (/ t_0 (* (* 2.0 s) (+ 1.0 t_0)))))
float code(float x, float s) {
float t_0 = expf((-fabsf(x) / s));
return t_0 / ((2.0f * s) * (1.0f + t_0));
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
t_0 = exp((-abs(x) / s))
code = t_0 / ((2.0e0 * s) * (1.0e0 + t_0))
end function
function code(x, s) t_0 = exp(Float32(Float32(-abs(x)) / s)) return Float32(t_0 / Float32(Float32(Float32(2.0) * s) * Float32(Float32(1.0) + t_0))) end
function tmp = code(x, s) t_0 = exp((-abs(x) / s)); tmp = t_0 / ((single(2.0) * s) * (single(1.0) + t_0)); end
\begin{array}{l}
t_0 := e^{\frac{-\left|x\right|}{s}}\\
\frac{t\_0}{\left(2 \cdot s\right) \cdot \left(1 + t\_0\right)}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites95.1%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (/ (exp (/ (- (fabs x)) s)) (* (fma s (exp (- (/ (fabs x) s))) s) 2.0)))
float code(float x, float s) {
return expf((-fabsf(x) / s)) / (fmaf(s, expf(-(fabsf(x) / s)), s) * 2.0f);
}
function code(x, s) return Float32(exp(Float32(Float32(-abs(x)) / s)) / Float32(fma(s, exp(Float32(-Float32(abs(x) / s))), s) * Float32(2.0))) end
\frac{e^{\frac{-\left|x\right|}{s}}}{\mathsf{fma}\left(s, e^{-\frac{\left|x\right|}{s}}, s\right) \cdot 2}
Initial program 99.5%
Applied rewrites99.6%
Taylor expanded in s around inf
Applied rewrites95.1%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (let* ((t_0 (sqrt (fabs x)))) (/ (exp (/ (- (fabs x)) s)) (* (+ s s) (- 2.0 (* t_0 (/ t_0 s)))))))
float code(float x, float s) {
float t_0 = sqrtf(fabsf(x));
return expf((-fabsf(x) / s)) / ((s + s) * (2.0f - (t_0 * (t_0 / s))));
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
t_0 = sqrt(abs(x))
code = exp((-abs(x) / s)) / ((s + s) * (2.0e0 - (t_0 * (t_0 / s))))
end function
function code(x, s) t_0 = sqrt(abs(x)) return Float32(exp(Float32(Float32(-abs(x)) / s)) / Float32(Float32(s + s) * Float32(Float32(2.0) - Float32(t_0 * Float32(t_0 / s))))) end
function tmp = code(x, s) t_0 = sqrt(abs(x)); tmp = exp((-abs(x) / s)) / ((s + s) * (single(2.0) - (t_0 * (t_0 / s)))); end
\begin{array}{l}
t_0 := \sqrt{\left|x\right|}\\
\frac{e^{\frac{-\left|x\right|}{s}}}{\left(s + s\right) \cdot \left(2 - t\_0 \cdot \frac{t\_0}{s}\right)}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites95.1%
Taylor expanded in s around inf
Applied rewrites94.6%
Applied rewrites94.6%
Applied rewrites94.6%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (/ (exp (/ (- (fabs x)) s)) (* (+ s s) (- 2.0 (/ (fabs x) s)))))
float code(float x, float s) {
return expf((-fabsf(x) / s)) / ((s + s) * (2.0f - (fabsf(x) / s)));
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
code = exp((-abs(x) / s)) / ((s + s) * (2.0e0 - (abs(x) / s)))
end function
function code(x, s) return Float32(exp(Float32(Float32(-abs(x)) / s)) / Float32(Float32(s + s) * Float32(Float32(2.0) - Float32(abs(x) / s)))) end
function tmp = code(x, s) tmp = exp((-abs(x) / s)) / ((s + s) * (single(2.0) - (abs(x) / s))); end
\frac{e^{\frac{-\left|x\right|}{s}}}{\left(s + s\right) \cdot \left(2 - \frac{\left|x\right|}{s}\right)}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites95.1%
Taylor expanded in s around inf
Applied rewrites94.6%
Applied rewrites94.6%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (let* ((t_0 (sqrt (fabs x)))) (/ (exp (/ (- (* t_0 t_0)) s)) (* 4.0 s))))
float code(float x, float s) {
float t_0 = sqrtf(fabsf(x));
return expf((-(t_0 * t_0) / s)) / (4.0f * s);
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
t_0 = sqrt(abs(x))
code = exp((-(t_0 * t_0) / s)) / (4.0e0 * s)
end function
function code(x, s) t_0 = sqrt(abs(x)) return Float32(exp(Float32(Float32(-Float32(t_0 * t_0)) / s)) / Float32(Float32(4.0) * s)) end
function tmp = code(x, s) t_0 = sqrt(abs(x)); tmp = exp((-(t_0 * t_0) / s)) / (single(4.0) * s); end
\begin{array}{l}
t_0 := \sqrt{\left|x\right|}\\
\frac{e^{\frac{-t\_0 \cdot t\_0}{s}}}{4 \cdot s}
\end{array}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
Applied rewrites94.8%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (/ (pow 0.3678794503211975 (/ (fabs x) s)) (* 4.0 s)))
float code(float x, float s) {
return powf(0.3678794503211975f, (fabsf(x) / s)) / (4.0f * s);
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
code = (0.3678794503211975e0 ** (abs(x) / s)) / (4.0e0 * s)
end function
function code(x, s) return Float32((Float32(0.3678794503211975) ^ Float32(abs(x) / s)) / Float32(Float32(4.0) * s)) end
function tmp = code(x, s) tmp = (single(0.3678794503211975) ^ (abs(x) / s)) / (single(4.0) * s); end
\frac{{0.3678794503211975}^{\left(\frac{\left|x\right|}{s}\right)}}{4 \cdot s}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
Applied rewrites94.8%
Evaluated real constant94.8%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (/ (exp (/ (- (fabs x)) s)) (* 4.0 s)))
float code(float x, float s) {
return expf((-fabsf(x) / s)) / (4.0f * s);
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
code = exp((-abs(x) / s)) / (4.0e0 * s)
end function
function code(x, s) return Float32(exp(Float32(Float32(-abs(x)) / s)) / Float32(Float32(4.0) * s)) end
function tmp = code(x, s) tmp = exp((-abs(x) / s)) / (single(4.0) * s); end
\frac{e^{\frac{-\left|x\right|}{s}}}{4 \cdot s}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites94.8%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (/ 1.0 (* (* 2.0 s) (/ (- (+ s s) (fabs x)) s))))
float code(float x, float s) {
return 1.0f / ((2.0f * s) * (((s + s) - fabsf(x)) / s));
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 1.0e0 / ((2.0e0 * s) * (((s + s) - abs(x)) / s))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(Float32(2.0) * s) * Float32(Float32(Float32(s + s) - abs(x)) / s))) end
function tmp = code(x, s) tmp = single(1.0) / ((single(2.0) * s) * (((s + s) - abs(x)) / s)); end
\frac{1}{\left(2 \cdot s\right) \cdot \frac{\left(s + s\right) - \left|x\right|}{s}}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites95.1%
Taylor expanded in s around inf
Applied rewrites94.6%
Taylor expanded in s around inf
Applied rewrites50.7%
Applied rewrites50.7%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (/ 1.0 (* (+ s s) (- 2.0 (/ (fabs x) s)))))
float code(float x, float s) {
return 1.0f / ((s + s) * (2.0f - (fabsf(x) / s)));
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 1.0e0 / ((s + s) * (2.0e0 - (abs(x) / s)))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(s + s) * Float32(Float32(2.0) - Float32(abs(x) / s)))) end
function tmp = code(x, s) tmp = single(1.0) / ((s + s) * (single(2.0) - (abs(x) / s))); end
\frac{1}{\left(s + s\right) \cdot \left(2 - \frac{\left|x\right|}{s}\right)}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites95.1%
Taylor expanded in s around inf
Applied rewrites94.6%
Applied rewrites94.6%
Taylor expanded in s around inf
Applied rewrites50.7%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (/ 0.125 (* 0.5 s)))
float code(float x, float s) {
return 0.125f / (0.5f * s);
}
real(4) function code(x, s)
use fmin_fmax_functions
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 0.125e0 / (0.5e0 * s)
end function
function code(x, s) return Float32(Float32(0.125) / Float32(Float32(0.5) * s)) end
function tmp = code(x, s) tmp = single(0.125) / (single(0.5) * s); end
\frac{0.125}{0.5 \cdot s}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites27.3%
Applied rewrites27.3%
Applied rewrites27.3%
(FPCore (x s) :precision binary32 :pre (and (<= 0.0 s) (<= s 1.0651631)) (/ 0.25 s))
float code(float x, float s) {
return 0.25f / s;
}
real(4) function code(x, s)
use fmin_fmax_functions
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
\frac{0.25}{s}
Initial program 99.5%
Taylor expanded in s around inf
Applied rewrites27.3%
herbie shell --seed 2026089 +o generate:egglog
(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))))))