
(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 13 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 (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.9%
Final simplification99.9%
(FPCore (x s)
:precision binary32
(if (<= (- (/ x s)) 0.029999999329447746)
0.5
(/
1.0
(fma
x
(fma (/ x (* s s)) (fma -0.16666666666666666 (/ x s) 0.5) (/ -1.0 s))
2.0))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 0.029999999329447746f) {
tmp = 0.5f;
} else {
tmp = 1.0f / fmaf(x, fmaf((x / (s * s)), fmaf(-0.16666666666666666f, (x / s), 0.5f), (-1.0f / s)), 2.0f);
}
return tmp;
}
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(0.029999999329447746)) tmp = Float32(0.5); else tmp = Float32(Float32(1.0) / fma(x, fma(Float32(x / Float32(s * s)), fma(Float32(-0.16666666666666666), Float32(x / s), Float32(0.5)), Float32(Float32(-1.0) / s)), Float32(2.0))); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 0.029999999329447746:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\mathsf{fma}\left(x, \mathsf{fma}\left(\frac{x}{s \cdot s}, \mathsf{fma}\left(-0.16666666666666666, \frac{x}{s}, 0.5\right), \frac{-1}{s}\right), 2\right)}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 0.0299999993Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites51.5%
if 0.0299999993 < (/.f32 (neg.f32 x) s) Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites90.1%
Final simplification66.0%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) -5.0) 0.5 (/ 1.0 (fma x (/ (fma (/ x s) 0.5 -1.0) s) 2.0))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= -5.0f) {
tmp = 0.5f;
} else {
tmp = 1.0f / fmaf(x, (fmaf((x / s), 0.5f, -1.0f) / s), 2.0f);
}
return tmp;
}
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(-5.0)) tmp = Float32(0.5); else tmp = Float32(Float32(1.0) / fma(x, Float32(fma(Float32(x / s), Float32(0.5), Float32(-1.0)) / s), Float32(2.0))); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq -5:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\mathsf{fma}\left(x, \frac{\mathsf{fma}\left(\frac{x}{s}, 0.5, -1\right)}{s}, 2\right)}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -5Initial program 100.0%
Taylor expanded in x around 0
Applied rewrites28.1%
if -5 < (/.f32 (neg.f32 x) s) Initial program 99.8%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
associate-*r*N/A
*-commutativeN/A
associate-/l*N/A
unpow2N/A
times-fracN/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 rewrites85.1%
lift-/.f32N/A
lift-/.f32N/A
lift-fma.f32N/A
lift-fma.f32N/A
lift-/.f3285.1
lift-fma.f32N/A
lift-/.f32N/A
associate-*l/N/A
associate-/l*N/A
lower-fma.f32N/A
lower-/.f3289.0
lift-fma.f32N/A
*-commutativeN/A
lower-fma.f3289.0
Applied rewrites89.0%
Final simplification65.7%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) 0.5) 0.5 (/ 1.0 (* x (/ (fma 0.5 (/ x s) -1.0) s)))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 0.5f) {
tmp = 0.5f;
} else {
tmp = 1.0f / (x * (fmaf(0.5f, (x / s), -1.0f) / s));
}
return tmp;
}
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(0.5)) tmp = Float32(0.5); else tmp = Float32(Float32(1.0) / Float32(x * Float32(fma(Float32(0.5), Float32(x / s), Float32(-1.0)) / s))); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 0.5:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{x \cdot \frac{\mathsf{fma}\left(0.5, \frac{x}{s}, -1\right)}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 0.5Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites51.3%
if 0.5 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
associate-*r*N/A
*-commutativeN/A
associate-/l*N/A
unpow2N/A
times-fracN/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 rewrites77.6%
lift-/.f32N/A
lift-/.f32N/A
lift-fma.f32N/A
lift-fma.f32N/A
lift-/.f3277.6
lift-fma.f32N/A
lift-/.f32N/A
associate-*l/N/A
associate-/l*N/A
lower-fma.f32N/A
lower-/.f3284.1
lift-fma.f32N/A
*-commutativeN/A
lower-fma.f3284.1
Applied rewrites84.1%
Taylor expanded in x around inf
unpow2N/A
associate-*l*N/A
lower-*.f32N/A
sub-negN/A
distribute-lft-inN/A
distribute-rgt-neg-outN/A
associate-/l/N/A
associate-*r/N/A
rgt-mult-inverseN/A
associate-*r/N/A
metadata-evalN/A
associate-/l*N/A
*-commutativeN/A
unpow2N/A
associate-/r*N/A
associate-*r/N/A
Applied rewrites84.1%
Final simplification63.2%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) 20.0) 0.5 (* (/ (* s s) x) (/ 2.0 x))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 20.0f) {
tmp = 0.5f;
} else {
tmp = ((s * s) / x) * (2.0f / 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) <= 20.0e0) then
tmp = 0.5e0
else
tmp = ((s * s) / x) * (2.0e0 / x)
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(20.0)) tmp = Float32(0.5); else tmp = Float32(Float32(Float32(s * s) / x) * Float32(Float32(2.0) / x)); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (-(x / s) <= single(20.0)) tmp = single(0.5); else tmp = ((s * s) / x) * (single(2.0) / x); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 20:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{s \cdot s}{x} \cdot \frac{2}{x}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 20Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites50.9%
if 20 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
associate-*r*N/A
*-commutativeN/A
associate-/l*N/A
unpow2N/A
times-fracN/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 rewrites78.8%
Taylor expanded in x around inf
associate-*r/N/A
lower-/.f32N/A
lower-*.f32N/A
unpow2N/A
lower-*.f32N/A
unpow2N/A
lower-*.f3282.1
Applied rewrites82.1%
lift-*.f32N/A
lift-*.f32N/A
lift-*.f32N/A
lift-/.f32N/A
/-rgt-identityN/A
/-rgt-identityN/A
lift-/.f32N/A
clear-numN/A
lift-*.f32N/A
associate-/r*N/A
div-invN/A
metadata-evalN/A
lift-*.f32N/A
times-fracN/A
lower-*.f32N/A
lower-/.f32N/A
lower-/.f3285.5
Applied rewrites85.5%
Final simplification63.2%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) 20000.0) 0.5 (* 2.0 (/ (* s s) (* x x)))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 20000.0f) {
tmp = 0.5f;
} else {
tmp = 2.0f * ((s * s) / (x * 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) <= 20000.0e0) then
tmp = 0.5e0
else
tmp = 2.0e0 * ((s * s) / (x * x))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(20000.0)) tmp = Float32(0.5); else tmp = Float32(Float32(2.0) * Float32(Float32(s * s) / Float32(x * x))); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (-(x / s) <= single(20000.0)) tmp = single(0.5); else tmp = single(2.0) * ((s * s) / (x * x)); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 20000:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;2 \cdot \frac{s \cdot s}{x \cdot x}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 2e4Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites50.3%
if 2e4 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
associate-*r*N/A
*-commutativeN/A
associate-/l*N/A
unpow2N/A
times-fracN/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 rewrites80.4%
Taylor expanded in x around inf
associate-*r/N/A
lower-/.f32N/A
lower-*.f32N/A
unpow2N/A
lower-*.f32N/A
unpow2N/A
lower-*.f3283.9
Applied rewrites83.9%
lift-*.f32N/A
lift-*.f32N/A
lift-*.f32N/A
lift-/.f32N/A
/-rgt-identityN/A
/-rgt-identityN/A
lift-/.f32N/A
clear-numN/A
frac-2negN/A
neg-mul-1N/A
*-commutativeN/A
lift-*.f32N/A
*-commutativeN/A
distribute-rgt-neg-inN/A
times-fracN/A
metadata-evalN/A
metadata-evalN/A
lower-*.f32N/A
lower-/.f3282.9
Applied rewrites82.9%
Final simplification61.6%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) 999999995904.0) 0.5 (* (* s s) (/ 2.0 (* x x)))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 999999995904.0f) {
tmp = 0.5f;
} else {
tmp = (s * s) * (2.0f / (x * 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) <= 999999995904.0e0) then
tmp = 0.5e0
else
tmp = (s * s) * (2.0e0 / (x * x))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(999999995904.0)) tmp = Float32(0.5); else tmp = Float32(Float32(s * s) * Float32(Float32(2.0) / Float32(x * x))); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (-(x / s) <= single(999999995904.0)) tmp = single(0.5); else tmp = (s * s) * (single(2.0) / (x * x)); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 999999995904:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\left(s \cdot s\right) \cdot \frac{2}{x \cdot x}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 999999996000Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites47.2%
if 999999996000 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
sub-negN/A
distribute-lft-inN/A
associate-*r*N/A
*-commutativeN/A
associate-/l*N/A
unpow2N/A
times-fracN/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 rewrites92.6%
Taylor expanded in x around inf
associate-*r/N/A
lower-/.f32N/A
lower-*.f32N/A
unpow2N/A
lower-*.f32N/A
unpow2N/A
lower-*.f3294.7
Applied rewrites94.7%
lift-*.f32N/A
lift-*.f32N/A
lift-*.f32N/A
lift-/.f32N/A
/-rgt-identityN/A
/-rgt-identityN/A
lift-/.f32N/A
associate-/r/N/A
lower-*.f32N/A
lift-*.f32N/A
associate-/r*N/A
metadata-evalN/A
lower-/.f3293.5
Applied rewrites93.5%
Final simplification60.9%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) 500000.0) 0.5 (* s (* 2.0 (/ s (* x x))))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 500000.0f) {
tmp = 0.5f;
} else {
tmp = s * (2.0f * (s / (x * 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) <= 500000.0e0) then
tmp = 0.5e0
else
tmp = s * (2.0e0 * (s / (x * x)))
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(s * Float32(Float32(2.0) * Float32(s / Float32(x * x)))); 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 = s * (single(2.0) * (s / (x * x))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 500000:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;s \cdot \left(2 \cdot \frac{s}{x \cdot x}\right)\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 5e5Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites49.6%
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
associate-*r*N/A
*-commutativeN/A
associate-/l*N/A
unpow2N/A
times-fracN/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 rewrites82.9%
Taylor expanded in x around inf
associate-*r/N/A
lower-/.f32N/A
lower-*.f32N/A
unpow2N/A
lower-*.f32N/A
unpow2N/A
lower-*.f3285.5
Applied rewrites85.5%
lift-*.f32N/A
lift-*.f32N/A
lift-*.f32N/A
lift-/.f32N/A
/-rgt-identityN/A
/-rgt-identityN/A
lift-/.f32N/A
clear-numN/A
lift-*.f32N/A
associate-/l*N/A
lower-*.f32N/A
remove-double-negN/A
neg-mul-1N/A
distribute-lft-neg-inN/A
metadata-evalN/A
lift-*.f32N/A
times-fracN/A
metadata-evalN/A
lower-*.f32N/A
lower-/.f3280.4
Applied rewrites80.4%
Final simplification59.9%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) -5.0) 0.5 (/ 1.0 (- 2.0 (/ x s)))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= -5.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) <= (-5.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(-5.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(-5.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 -5:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2 - \frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -5Initial program 100.0%
Taylor expanded in x around 0
Applied rewrites28.1%
if -5 < (/.f32 (neg.f32 x) s) Initial program 99.8%
Taylor expanded in x around 0
mul-1-negN/A
unsub-negN/A
lower--.f32N/A
lower-/.f3267.7
Applied rewrites67.7%
Final simplification52.6%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) 0.5) 0.5 (/ -1.0 (/ x s))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 0.5f) {
tmp = 0.5f;
} else {
tmp = -1.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) <= 0.5e0) then
tmp = 0.5e0
else
tmp = (-1.0e0) / (x / s)
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(0.5)) tmp = Float32(0.5); else tmp = Float32(Float32(-1.0) / Float32(x / s)); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (-(x / s) <= single(0.5)) tmp = single(0.5); else tmp = single(-1.0) / (x / s); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 0.5:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{\frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 0.5Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites51.3%
if 0.5 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
mul-1-negN/A
unsub-negN/A
lower--.f32N/A
lower-/.f3249.9
Applied rewrites49.9%
Taylor expanded in x around inf
mul-1-negN/A
distribute-neg-frac2N/A
mul-1-negN/A
lower-/.f32N/A
mul-1-negN/A
lower-neg.f3246.8
Applied rewrites46.8%
lift-neg.f32N/A
clear-numN/A
associate-/r/N/A
metadata-evalN/A
lift-neg.f32N/A
frac-2negN/A
lower-*.f32N/A
lower-/.f3246.8
Applied rewrites46.8%
associate-*l/N/A
associate-/l*N/A
clear-numN/A
lift-/.f32N/A
un-div-invN/A
lower-/.f3249.8
Applied rewrites49.8%
Final simplification50.7%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) 0.5) 0.5 (* s (/ -1.0 x))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 0.5f) {
tmp = 0.5f;
} else {
tmp = s * (-1.0f / 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) <= 0.5e0) then
tmp = 0.5e0
else
tmp = s * ((-1.0e0) / x)
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(0.5)) tmp = Float32(0.5); else tmp = Float32(s * Float32(Float32(-1.0) / x)); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (-(x / s) <= single(0.5)) tmp = single(0.5); else tmp = s * (single(-1.0) / x); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 0.5:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;s \cdot \frac{-1}{x}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 0.5Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites51.3%
if 0.5 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
mul-1-negN/A
unsub-negN/A
lower--.f32N/A
lower-/.f3249.9
Applied rewrites49.9%
Taylor expanded in x around inf
mul-1-negN/A
distribute-neg-frac2N/A
mul-1-negN/A
lower-/.f32N/A
mul-1-negN/A
lower-neg.f3246.8
Applied rewrites46.8%
lift-neg.f32N/A
clear-numN/A
associate-/r/N/A
metadata-evalN/A
lift-neg.f32N/A
frac-2negN/A
lower-*.f32N/A
lower-/.f3246.8
Applied rewrites46.8%
Final simplification49.6%
(FPCore (x s) :precision binary32 (if (<= (- (/ x s)) 0.5) 0.5 (- (/ s x))))
float code(float x, float s) {
float tmp;
if (-(x / s) <= 0.5f) {
tmp = 0.5f;
} else {
tmp = -(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) <= 0.5e0) then
tmp = 0.5e0
else
tmp = -(s / x)
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(-Float32(x / s)) <= Float32(0.5)) tmp = Float32(0.5); else tmp = Float32(-Float32(s / x)); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (-(x / s) <= single(0.5)) tmp = single(0.5); else tmp = -(s / x); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-\frac{x}{s} \leq 0.5:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;-\frac{s}{x}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 0.5Initial program 99.8%
Taylor expanded in x around 0
Applied rewrites51.3%
if 0.5 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0
mul-1-negN/A
unsub-negN/A
lower--.f32N/A
lower-/.f3249.9
Applied rewrites49.9%
Taylor expanded in x around inf
mul-1-negN/A
distribute-neg-frac2N/A
mul-1-negN/A
lower-/.f32N/A
mul-1-negN/A
lower-neg.f3246.8
Applied rewrites46.8%
Final simplification49.6%
(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.9%
Taylor expanded in x around 0
Applied rewrites35.0%
herbie shell --seed 2024219
(FPCore (x s)
:name "Logistic function"
:precision binary32
:pre (and (<= 0.0 s) (<= s 1.0651631))
(/ 1.0 (+ 1.0 (exp (/ (- x) s)))))