
(FPCore (x s) :precision binary32 (/ 1.0 (+ 1.0 (exp (/ (- x) s)))))
float code(float x, float s) {
return 1.0f / (1.0f + expf((-x / s)));
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 1.0e0 / (1.0e0 + exp((-x / s)))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(1.0) + exp(Float32(Float32(-x) / s)))) end
function tmp = code(x, s) tmp = single(1.0) / (single(1.0) + exp((-x / s))); end
\begin{array}{l}
\\
\frac{1}{1 + e^{\frac{-x}{s}}}
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 10 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x s) :precision binary32 (/ 1.0 (+ 1.0 (exp (/ (- x) s)))))
float code(float x, float s) {
return 1.0f / (1.0f + expf((-x / s)));
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 1.0e0 / (1.0e0 + exp((-x / s)))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(1.0) + exp(Float32(Float32(-x) / s)))) end
function tmp = code(x, s) tmp = single(1.0) / (single(1.0) + exp((-x / s))); end
\begin{array}{l}
\\
\frac{1}{1 + e^{\frac{-x}{s}}}
\end{array}
(FPCore (x s) :precision binary32 (/ 1.0 (+ 1.0 (pow (exp 2.0) (* -0.5 (/ x s))))))
float code(float x, float s) {
return 1.0f / (1.0f + powf(expf(2.0f), (-0.5f * (x / s))));
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 1.0e0 / (1.0e0 + (exp(2.0e0) ** ((-0.5e0) * (x / s))))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(1.0) + (exp(Float32(2.0)) ^ Float32(Float32(-0.5) * Float32(x / s))))) end
function tmp = code(x, s) tmp = single(1.0) / (single(1.0) + (exp(single(2.0)) ^ (single(-0.5) * (x / s)))); end
\begin{array}{l}
\\
\frac{1}{1 + {\left(e^{2}\right)}^{\left(-0.5 \cdot \frac{x}{s}\right)}}
\end{array}
Initial program 99.8%
lift-exp.f32N/A
*-lft-identityN/A
exp-prodN/A
lower-pow.f32N/A
exp-1-eN/A
lower-E.f3299.8
Applied rewrites99.8%
lift-pow.f32N/A
sqr-powN/A
pow-prod-downN/A
lift-E.f32N/A
lift-E.f32N/A
lower-pow.f32N/A
e-exp-1N/A
e-exp-1N/A
prod-expN/A
metadata-evalN/A
lower-exp.f32N/A
lift-/.f32N/A
associate-/l/N/A
lift-neg.f32N/A
neg-mul-1N/A
times-fracN/A
metadata-evalN/A
metadata-evalN/A
lift-/.f32N/A
lower-*.f32N/A
metadata-eval99.9
Applied rewrites99.9%
(FPCore (x s) :precision binary32 (if (<= (exp (/ (- x) s)) 5.000000015855384e-29) (/ 1.0 (+ 1.0 (fma (/ x s) (fma (/ 0.5 s) x -1.0) 1.0))) (/ 1.0 (- 2.0 (/ (- x (* (* (/ 0.5 s) x) x)) s)))))
float code(float x, float s) {
float tmp;
if (expf((-x / s)) <= 5.000000015855384e-29f) {
tmp = 1.0f / (1.0f + fmaf((x / s), fmaf((0.5f / s), x, -1.0f), 1.0f));
} else {
tmp = 1.0f / (2.0f - ((x - (((0.5f / s) * x) * x)) / s));
}
return tmp;
}
function code(x, s) tmp = Float32(0.0) if (exp(Float32(Float32(-x) / s)) <= Float32(5.000000015855384e-29)) tmp = Float32(Float32(1.0) / Float32(Float32(1.0) + fma(Float32(x / s), fma(Float32(Float32(0.5) / s), x, Float32(-1.0)), Float32(1.0)))); else tmp = Float32(Float32(1.0) / Float32(Float32(2.0) - Float32(Float32(x - Float32(Float32(Float32(Float32(0.5) / s) * x) * x)) / s))); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;e^{\frac{-x}{s}} \leq 5.000000015855384 \cdot 10^{-29}:\\
\;\;\;\;\frac{1}{1 + \mathsf{fma}\left(\frac{x}{s}, \mathsf{fma}\left(\frac{0.5}{s}, x, -1\right), 1\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2 - \frac{x - \left(\frac{0.5}{s} \cdot x\right) \cdot x}{s}}\\
\end{array}
\end{array}
if (exp.f32 (/.f32 (neg.f32 x) s)) < 5.00000002e-29Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
associate-*r/N/A
unpow2N/A
times-fracN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
associate-*r/N/A
distribute-rgt-outN/A
lower-fma.f32N/A
Applied rewrites28.1%
if 5.00000002e-29 < (exp.f32 (/.f32 (neg.f32 x) s)) Initial program 99.7%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
associate-*r/N/A
unpow2N/A
times-fracN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
associate-*r/N/A
distribute-rgt-outN/A
lower-fma.f32N/A
Applied rewrites46.0%
Applied rewrites67.1%
Applied rewrites82.4%
Final simplification60.4%
(FPCore (x s) :precision binary32 (/ 1.0 (+ 1.0 (exp (/ (- x) s)))))
float code(float x, float s) {
return 1.0f / (1.0f + expf((-x / s)));
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 1.0e0 / (1.0e0 + exp((-x / s)))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(1.0) + exp(Float32(Float32(-x) / s)))) end
function tmp = code(x, s) tmp = single(1.0) / (single(1.0) + exp((-x / s))); end
\begin{array}{l}
\\
\frac{1}{1 + e^{\frac{-x}{s}}}
\end{array}
Initial program 99.8%
(FPCore (x s)
:precision binary32
(let* ((t_0 (/ (- x) s)) (t_1 (/ 0.5 (* s s))))
(if (<= t_0 -50.0)
(/ 1.0 (+ 1.0 (fma (fma t_1 x (/ -1.0 s)) x 1.0)))
(if (<= t_0 100.0)
(/ 1.0 (- 2.0 (/ (- x (* (* (/ 0.5 s) x) x)) s)))
(/ 1.0 (* (* (- t_1 (/ (- (/ 1.0 s) (/ 2.0 x)) x)) x) x))))))
float code(float x, float s) {
float t_0 = -x / s;
float t_1 = 0.5f / (s * s);
float tmp;
if (t_0 <= -50.0f) {
tmp = 1.0f / (1.0f + fmaf(fmaf(t_1, x, (-1.0f / s)), x, 1.0f));
} else if (t_0 <= 100.0f) {
tmp = 1.0f / (2.0f - ((x - (((0.5f / s) * x) * x)) / s));
} else {
tmp = 1.0f / (((t_1 - (((1.0f / s) - (2.0f / x)) / x)) * x) * x);
}
return tmp;
}
function code(x, s) t_0 = Float32(Float32(-x) / s) t_1 = Float32(Float32(0.5) / Float32(s * s)) tmp = Float32(0.0) if (t_0 <= Float32(-50.0)) tmp = Float32(Float32(1.0) / Float32(Float32(1.0) + fma(fma(t_1, x, Float32(Float32(-1.0) / s)), x, Float32(1.0)))); elseif (t_0 <= Float32(100.0)) tmp = Float32(Float32(1.0) / Float32(Float32(2.0) - Float32(Float32(x - Float32(Float32(Float32(Float32(0.5) / s) * x) * x)) / s))); else tmp = Float32(Float32(1.0) / Float32(Float32(Float32(t_1 - Float32(Float32(Float32(Float32(1.0) / s) - Float32(Float32(2.0) / x)) / x)) * x) * x)); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{-x}{s}\\
t_1 := \frac{0.5}{s \cdot s}\\
\mathbf{if}\;t\_0 \leq -50:\\
\;\;\;\;\frac{1}{1 + \mathsf{fma}\left(\mathsf{fma}\left(t\_1, x, \frac{-1}{s}\right), x, 1\right)}\\
\mathbf{elif}\;t\_0 \leq 100:\\
\;\;\;\;\frac{1}{2 - \frac{x - \left(\frac{0.5}{s} \cdot x\right) \cdot x}{s}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\left(\left(t\_1 - \frac{\frac{1}{s} - \frac{2}{x}}{x}\right) \cdot x\right) \cdot x}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -50Initial program 100.0%
lift-exp.f32N/A
*-lft-identityN/A
exp-prodN/A
lower-pow.f32N/A
exp-1-eN/A
lower-E.f32100.0
Applied rewrites100.0%
Taylor expanded in x around 0
+-commutativeN/A
Applied rewrites28.1%
if -50 < (/.f32 (neg.f32 x) s) < 100Initial program 99.5%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
associate-*r/N/A
unpow2N/A
times-fracN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
associate-*r/N/A
distribute-rgt-outN/A
lower-fma.f32N/A
Applied rewrites87.7%
Applied rewrites92.2%
Applied rewrites94.0%
if 100 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
associate-*r/N/A
unpow2N/A
times-fracN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
associate-*r/N/A
distribute-rgt-outN/A
lower-fma.f32N/A
Applied rewrites6.3%
Taylor expanded in x around -inf
Applied rewrites85.1%
(FPCore (x s)
:precision binary32
(let* ((t_0 (/ (- x) s)))
(if (<= t_0 -50.0)
(/ 1.0 (+ 1.0 (fma (/ x s) (fma (/ 0.5 s) x -1.0) 1.0)))
(if (<= t_0 500000.0)
(/ 1.0 (- 2.0 (/ 1.0 (/ s x))))
(/ 1.0 (/ (* x (- (* 0.5 x) s)) (* s s)))))))
float code(float x, float s) {
float t_0 = -x / s;
float tmp;
if (t_0 <= -50.0f) {
tmp = 1.0f / (1.0f + fmaf((x / s), fmaf((0.5f / s), x, -1.0f), 1.0f));
} else if (t_0 <= 500000.0f) {
tmp = 1.0f / (2.0f - (1.0f / (s / x)));
} else {
tmp = 1.0f / ((x * ((0.5f * x) - s)) / (s * s));
}
return tmp;
}
function code(x, s) t_0 = Float32(Float32(-x) / s) tmp = Float32(0.0) if (t_0 <= Float32(-50.0)) tmp = Float32(Float32(1.0) / Float32(Float32(1.0) + fma(Float32(x / s), fma(Float32(Float32(0.5) / s), x, Float32(-1.0)), Float32(1.0)))); elseif (t_0 <= Float32(500000.0)) tmp = Float32(Float32(1.0) / Float32(Float32(2.0) - Float32(Float32(1.0) / Float32(s / x)))); else tmp = Float32(Float32(1.0) / Float32(Float32(x * Float32(Float32(Float32(0.5) * x) - s)) / Float32(s * s))); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{-x}{s}\\
\mathbf{if}\;t\_0 \leq -50:\\
\;\;\;\;\frac{1}{1 + \mathsf{fma}\left(\frac{x}{s}, \mathsf{fma}\left(\frac{0.5}{s}, x, -1\right), 1\right)}\\
\mathbf{elif}\;t\_0 \leq 500000:\\
\;\;\;\;\frac{1}{2 - \frac{1}{\frac{s}{x}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{x \cdot \left(0.5 \cdot x - s\right)}{s \cdot s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -50Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
associate-*r/N/A
unpow2N/A
times-fracN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
associate-*r/N/A
distribute-rgt-outN/A
lower-fma.f32N/A
Applied rewrites28.1%
if -50 < (/.f32 (neg.f32 x) s) < 5e5Initial program 99.5%
lift-exp.f32N/A
*-lft-identityN/A
exp-prodN/A
lower-pow.f32N/A
exp-1-eN/A
lower-E.f3299.4
Applied rewrites99.4%
Taylor expanded in x around 0
mul-1-negN/A
unsub-negN/A
log-EN/A
*-rgt-identityN/A
lower--.f32N/A
lower-/.f3287.2
Applied rewrites87.2%
Applied rewrites87.2%
if 5e5 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
associate-*r/N/A
unpow2N/A
times-fracN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
associate-*r/N/A
distribute-rgt-outN/A
lower-fma.f32N/A
Applied rewrites6.3%
Applied rewrites45.4%
Taylor expanded in s around 0
Applied rewrites84.3%
Final simplification65.1%
(FPCore (x s) :precision binary32 (if (<= (/ (- x) s) -50.0) (/ 1.0 (+ 1.0 (fma (fma (/ 0.5 (* s s)) x (/ -1.0 s)) x 1.0))) (/ 1.0 (- 2.0 (/ (- x (* (* (/ 0.5 s) x) x)) s)))))
float code(float x, float s) {
float tmp;
if ((-x / s) <= -50.0f) {
tmp = 1.0f / (1.0f + fmaf(fmaf((0.5f / (s * s)), x, (-1.0f / s)), x, 1.0f));
} else {
tmp = 1.0f / (2.0f - ((x - (((0.5f / s) * x) * x)) / s));
}
return tmp;
}
function code(x, s) tmp = Float32(0.0) if (Float32(Float32(-x) / s) <= Float32(-50.0)) tmp = Float32(Float32(1.0) / Float32(Float32(1.0) + fma(fma(Float32(Float32(0.5) / Float32(s * s)), x, Float32(Float32(-1.0) / s)), x, Float32(1.0)))); else tmp = Float32(Float32(1.0) / Float32(Float32(2.0) - Float32(Float32(x - Float32(Float32(Float32(Float32(0.5) / s) * x) * x)) / s))); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{-x}{s} \leq -50:\\
\;\;\;\;\frac{1}{1 + \mathsf{fma}\left(\mathsf{fma}\left(\frac{0.5}{s \cdot s}, x, \frac{-1}{s}\right), x, 1\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2 - \frac{x - \left(\frac{0.5}{s} \cdot x\right) \cdot x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -50Initial program 100.0%
lift-exp.f32N/A
*-lft-identityN/A
exp-prodN/A
lower-pow.f32N/A
exp-1-eN/A
lower-E.f32100.0
Applied rewrites100.0%
Taylor expanded in x around 0
+-commutativeN/A
Applied rewrites28.1%
if -50 < (/.f32 (neg.f32 x) s) Initial program 99.7%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
associate-*r/N/A
unpow2N/A
times-fracN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
associate-*r/N/A
distribute-rgt-outN/A
lower-fma.f32N/A
Applied rewrites46.0%
Applied rewrites67.1%
Applied rewrites82.4%
(FPCore (x s) :precision binary32 (if (<= (/ (- x) s) 500000.0) 0.5 (/ 1.0 (/ (* x (- (* 0.5 x) s)) (* s s)))))
float code(float x, float s) {
float tmp;
if ((-x / s) <= 500000.0f) {
tmp = 0.5f;
} else {
tmp = 1.0f / ((x * ((0.5f * x) - s)) / (s * s));
}
return tmp;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: tmp
if ((-x / s) <= 500000.0e0) then
tmp = 0.5e0
else
tmp = 1.0e0 / ((x * ((0.5e0 * x) - s)) / (s * s))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(Float32(-x) / s) <= Float32(500000.0)) tmp = Float32(0.5); else tmp = Float32(Float32(1.0) / Float32(Float32(x * Float32(Float32(Float32(0.5) * x) - s)) / Float32(s * s))); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if ((-x / s) <= single(500000.0)) tmp = single(0.5); else tmp = single(1.0) / ((x * ((single(0.5) * x) - s)) / (s * s)); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{-x}{s} \leq 500000:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{x \cdot \left(0.5 \cdot x - s\right)}{s \cdot s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 5e5Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites54.4%
if 5e5 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
associate-*r/N/A
unpow2N/A
times-fracN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
distribute-neg-fracN/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
associate-*r/N/A
distribute-rgt-outN/A
lower-fma.f32N/A
Applied rewrites6.3%
Applied rewrites45.4%
Taylor expanded in s around 0
Applied rewrites84.3%
Final simplification63.7%
(FPCore (x s) :precision binary32 (if (<= (/ (- x) s) -50.0) 0.5 (/ 1.0 (- 2.0 (* (/ 1.0 s) x)))))
float code(float x, float s) {
float tmp;
if ((-x / s) <= -50.0f) {
tmp = 0.5f;
} else {
tmp = 1.0f / (2.0f - ((1.0f / s) * x));
}
return tmp;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: tmp
if ((-x / s) <= (-50.0e0)) then
tmp = 0.5e0
else
tmp = 1.0e0 / (2.0e0 - ((1.0e0 / s) * x))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(Float32(-x) / s) <= Float32(-50.0)) tmp = Float32(0.5); else tmp = Float32(Float32(1.0) / Float32(Float32(2.0) - Float32(Float32(Float32(1.0) / s) * x))); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if ((-x / s) <= single(-50.0)) tmp = single(0.5); else tmp = single(1.0) / (single(2.0) - ((single(1.0) / s) * x)); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{-x}{s} \leq -50:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2 - \frac{1}{s} \cdot x}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -50Initial program 100.0%
Taylor expanded in x around 0
Applied rewrites28.1%
if -50 < (/.f32 (neg.f32 x) s) Initial program 99.7%
lift-exp.f32N/A
*-lft-identityN/A
exp-prodN/A
lower-pow.f32N/A
exp-1-eN/A
lower-E.f3299.7
Applied rewrites99.7%
Taylor expanded in x around 0
mul-1-negN/A
unsub-negN/A
log-EN/A
*-rgt-identityN/A
lower--.f32N/A
lower-/.f3267.1
Applied rewrites67.1%
Applied rewrites67.6%
Final simplification53.4%
(FPCore (x s) :precision binary32 (if (<= (/ (- x) s) -50.0) 0.5 (/ 1.0 (- 2.0 (/ x s)))))
float code(float x, float s) {
float tmp;
if ((-x / s) <= -50.0f) {
tmp = 0.5f;
} else {
tmp = 1.0f / (2.0f - (x / s));
}
return tmp;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: tmp
if ((-x / s) <= (-50.0e0)) then
tmp = 0.5e0
else
tmp = 1.0e0 / (2.0e0 - (x / s))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(Float32(-x) / s) <= Float32(-50.0)) tmp = Float32(0.5); else tmp = Float32(Float32(1.0) / Float32(Float32(2.0) - Float32(x / s))); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if ((-x / s) <= single(-50.0)) tmp = single(0.5); else tmp = single(1.0) / (single(2.0) - (x / s)); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{-x}{s} \leq -50:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2 - \frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -50Initial program 100.0%
Taylor expanded in x around 0
Applied rewrites28.1%
if -50 < (/.f32 (neg.f32 x) s) Initial program 99.7%
Taylor expanded in x around 0
mul-1-negN/A
unsub-negN/A
lower--.f32N/A
lower-/.f3267.1
Applied rewrites67.1%
(FPCore (x s) :precision binary32 0.5)
float code(float x, float s) {
return 0.5f;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 0.5e0
end function
function code(x, s) return Float32(0.5) end
function tmp = code(x, s) tmp = single(0.5); end
\begin{array}{l}
\\
0.5
\end{array}
Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites39.6%
herbie shell --seed 2024322
(FPCore (x s)
:name "Logistic function"
:precision binary32
:pre (and (<= 0.0 s) (<= s 1.0651631))
(/ 1.0 (+ 1.0 (exp (/ (- x) s)))))