
(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 (* (pow (exp (* (- x) (/ 0.25 s))) 2.0) (pow (exp -0.5) (/ x s))))))
float code(float x, float s) {
return 1.0f / (1.0f + (powf(expf((-x * (0.25f / s))), 2.0f) * powf(expf(-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((-x * (0.25e0 / s))) ** 2.0e0) * (exp((-0.5e0)) ** (x / s))))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(1.0) + Float32((exp(Float32(Float32(-x) * Float32(Float32(0.25) / s))) ^ Float32(2.0)) * (exp(Float32(-0.5)) ^ Float32(x / s))))) end
function tmp = code(x, s) tmp = single(1.0) / (single(1.0) + ((exp((-x * (single(0.25) / s))) ^ single(2.0)) * (exp(single(-0.5)) ^ (x / s)))); end
\begin{array}{l}
\\
\frac{1}{1 + {\left(e^{\left(-x\right) \cdot \frac{0.25}{s}}\right)}^{2} \cdot {\left(e^{-0.5}\right)}^{\left(\frac{x}{s}\right)}}
\end{array}
Initial program 99.7%
unpow1N/A
metadata-evalN/A
sqrt-pow1N/A
pow2N/A
sqrt-prodN/A
lower-*.f32N/A
lower-sqrt.f32N/A
lower-sqrt.f3299.6
Applied rewrites99.6%
rem-square-sqrtN/A
pow1/2N/A
pow1/2N/A
pow2N/A
lower-pow.f32N/A
lift-sqrt.f32N/A
pow1/2N/A
pow-powN/A
lift-exp.f32N/A
pow-expN/A
lower-exp.f32N/A
lower-*.f32N/A
metadata-eval99.7
Applied rewrites99.7%
lift-*.f32N/A
lift-/.f32N/A
associate-*l/N/A
associate-/l*N/A
lower-*.f32N/A
lower-/.f3299.7
Applied rewrites99.7%
Taylor expanded in x around inf
exp-sqrt-revN/A
*-commutativeN/A
associate-/l*N/A
metadata-evalN/A
*-commutativeN/A
exp-prodN/A
lower-pow.f32N/A
lower-exp.f32N/A
lower-/.f3299.8
Applied rewrites99.8%
(FPCore (x s) :precision binary32 (/ 1.0 (+ 1.0 (* (pow (exp (* (- x) (/ 0.25 s))) 2.0) (sqrt (exp (/ (- x) s)))))))
float code(float x, float s) {
return 1.0f / (1.0f + (powf(expf((-x * (0.25f / s))), 2.0f) * sqrtf(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 * (0.25e0 / s))) ** 2.0e0) * sqrt(exp((-x / s)))))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(1.0) + Float32((exp(Float32(Float32(-x) * Float32(Float32(0.25) / s))) ^ Float32(2.0)) * sqrt(exp(Float32(Float32(-x) / s)))))) end
function tmp = code(x, s) tmp = single(1.0) / (single(1.0) + ((exp((-x * (single(0.25) / s))) ^ single(2.0)) * sqrt(exp((-x / s))))); end
\begin{array}{l}
\\
\frac{1}{1 + {\left(e^{\left(-x\right) \cdot \frac{0.25}{s}}\right)}^{2} \cdot \sqrt{e^{\frac{-x}{s}}}}
\end{array}
Initial program 99.7%
unpow1N/A
metadata-evalN/A
sqrt-pow1N/A
pow2N/A
sqrt-prodN/A
lower-*.f32N/A
lower-sqrt.f32N/A
lower-sqrt.f3299.6
Applied rewrites99.6%
rem-square-sqrtN/A
pow1/2N/A
pow1/2N/A
pow2N/A
lower-pow.f32N/A
lift-sqrt.f32N/A
pow1/2N/A
pow-powN/A
lift-exp.f32N/A
pow-expN/A
lower-exp.f32N/A
lower-*.f32N/A
metadata-eval99.7
Applied rewrites99.7%
lift-*.f32N/A
lift-/.f32N/A
associate-*l/N/A
associate-/l*N/A
lower-*.f32N/A
lower-/.f3299.7
Applied rewrites99.7%
(FPCore (x s) :precision binary32 (if (<= (exp (/ (- x) s)) 0.5) (/ 1.0 (fma (- 1.0 (/ x s)) 1.0 1.0)) (/ 1.0 (/ (- (* 2.0 s) x) s))))
float code(float x, float s) {
float tmp;
if (expf((-x / s)) <= 0.5f) {
tmp = 1.0f / fmaf((1.0f - (x / s)), 1.0f, 1.0f);
} else {
tmp = 1.0f / (((2.0f * s) - x) / s);
}
return tmp;
}
function code(x, s) tmp = Float32(0.0) if (exp(Float32(Float32(-x) / s)) <= Float32(0.5)) tmp = Float32(Float32(1.0) / fma(Float32(Float32(1.0) - Float32(x / s)), Float32(1.0), Float32(1.0))); else tmp = Float32(Float32(1.0) / Float32(Float32(Float32(Float32(2.0) * s) - x) / s)); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;e^{\frac{-x}{s}} \leq 0.5:\\
\;\;\;\;\frac{1}{\mathsf{fma}\left(1 - \frac{x}{s}, 1, 1\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot s - x}{s}}\\
\end{array}
\end{array}
if (exp.f32 (/.f32 (neg.f32 x) s)) < 0.5Initial program 99.9%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f325.2
Applied rewrites5.2%
lift-+.f32N/A
+-commutativeN/A
*-lft-identityN/A
*-commutativeN/A
lower-fma.f3298.1
Applied rewrites97.1%
if 0.5 < (exp.f32 (/.f32 (neg.f32 x) s)) Initial program 99.6%
unpow1N/A
metadata-evalN/A
sqrt-pow1N/A
pow2N/A
sqrt-prodN/A
lower-*.f32N/A
lower-sqrt.f32N/A
lower-sqrt.f3299.5
Applied rewrites99.5%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f3263.8
Applied rewrites63.8%
Taylor expanded in s around 0
Applied rewrites63.8%
Final simplification76.5%
(FPCore (x s) :precision binary32 (if (<= (exp (/ (- x) s)) 0.5) (/ 1.0 (fma 1.0 (- 1.0 (/ x s)) 1.0)) (/ 1.0 (/ (- (* 2.0 s) x) s))))
float code(float x, float s) {
float tmp;
if (expf((-x / s)) <= 0.5f) {
tmp = 1.0f / fmaf(1.0f, (1.0f - (x / s)), 1.0f);
} else {
tmp = 1.0f / (((2.0f * s) - x) / s);
}
return tmp;
}
function code(x, s) tmp = Float32(0.0) if (exp(Float32(Float32(-x) / s)) <= Float32(0.5)) tmp = Float32(Float32(1.0) / fma(Float32(1.0), Float32(Float32(1.0) - Float32(x / s)), Float32(1.0))); else tmp = Float32(Float32(1.0) / Float32(Float32(Float32(Float32(2.0) * s) - x) / s)); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;e^{\frac{-x}{s}} \leq 0.5:\\
\;\;\;\;\frac{1}{\mathsf{fma}\left(1, 1 - \frac{x}{s}, 1\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot s - x}{s}}\\
\end{array}
\end{array}
if (exp.f32 (/.f32 (neg.f32 x) s)) < 0.5Initial program 99.9%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f325.2
Applied rewrites5.2%
lift-+.f32N/A
+-commutativeN/A
*-lft-identityN/A
lower-fma.f3298.1
Applied rewrites97.2%
if 0.5 < (exp.f32 (/.f32 (neg.f32 x) s)) Initial program 99.6%
unpow1N/A
metadata-evalN/A
sqrt-pow1N/A
pow2N/A
sqrt-prodN/A
lower-*.f32N/A
lower-sqrt.f32N/A
lower-sqrt.f3299.5
Applied rewrites99.5%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f3263.8
Applied rewrites63.8%
Taylor expanded in s around 0
Applied rewrites63.8%
Final simplification76.4%
(FPCore (x s) :precision binary32 (if (<= (exp (/ (- x) s)) 0.5) (/ 1.0 (* (/ 2.0 x) x)) (/ 1.0 (/ (- (* 2.0 s) x) s))))
float code(float x, float s) {
float tmp;
if (expf((-x / s)) <= 0.5f) {
tmp = 1.0f / ((2.0f / x) * x);
} else {
tmp = 1.0f / (((2.0f * s) - x) / s);
}
return tmp;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: tmp
if (exp((-x / s)) <= 0.5e0) then
tmp = 1.0e0 / ((2.0e0 / x) * x)
else
tmp = 1.0e0 / (((2.0e0 * s) - x) / s)
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (exp(Float32(Float32(-x) / s)) <= Float32(0.5)) tmp = Float32(Float32(1.0) / Float32(Float32(Float32(2.0) / x) * x)); else tmp = Float32(Float32(1.0) / Float32(Float32(Float32(Float32(2.0) * s) - x) / s)); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (exp((-x / s)) <= single(0.5)) tmp = single(1.0) / ((single(2.0) / x) * x); else tmp = single(1.0) / (((single(2.0) * s) - x) / s); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;e^{\frac{-x}{s}} \leq 0.5:\\
\;\;\;\;\frac{1}{\frac{2}{x} \cdot x}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot s - x}{s}}\\
\end{array}
\end{array}
if (exp.f32 (/.f32 (neg.f32 x) s)) < 0.5Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
*-commutativeN/A
associate-*l/N/A
associate-*r/N/A
metadata-evalN/A
associate-*r/N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f32N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f32N/A
unpow2N/A
lower-*.f32N/A
lower-/.f3228.2
Applied rewrites27.9%
Taylor expanded in x around -inf
Applied rewrites5.5%
Taylor expanded in x around 0
Applied rewrites28.2%
if 0.5 < (exp.f32 (/.f32 (neg.f32 x) s)) Initial program 99.6%
unpow1N/A
metadata-evalN/A
sqrt-pow1N/A
pow2N/A
sqrt-prodN/A
lower-*.f32N/A
lower-sqrt.f32N/A
lower-sqrt.f3299.5
Applied rewrites99.5%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f3263.8
Applied rewrites63.8%
Taylor expanded in s around 0
Applied rewrites63.8%
Final simplification50.0%
(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.7%
(FPCore (x s)
:precision binary32
(let* ((t_0 (/ (- x) s)))
(if (<= t_0 -200.0)
(/ 1.0 (fma (- 1.0 (/ x s)) 1.0 1.0))
(if (<= t_0 0.05000000074505806)
(+ (* (/ 0.25 s) x) 0.5)
(/ 1.0 (* (* (/ 0.5 (* s s)) x) x))))))
float code(float x, float s) {
float t_0 = -x / s;
float tmp;
if (t_0 <= -200.0f) {
tmp = 1.0f / fmaf((1.0f - (x / s)), 1.0f, 1.0f);
} else if (t_0 <= 0.05000000074505806f) {
tmp = ((0.25f / s) * x) + 0.5f;
} else {
tmp = 1.0f / (((0.5f / (s * s)) * x) * x);
}
return tmp;
}
function code(x, s) t_0 = Float32(Float32(-x) / s) tmp = Float32(0.0) if (t_0 <= Float32(-200.0)) tmp = Float32(Float32(1.0) / fma(Float32(Float32(1.0) - Float32(x / s)), Float32(1.0), Float32(1.0))); elseif (t_0 <= Float32(0.05000000074505806)) tmp = Float32(Float32(Float32(Float32(0.25) / s) * x) + Float32(0.5)); else tmp = Float32(Float32(1.0) / Float32(Float32(Float32(Float32(0.5) / Float32(s * s)) * x) * x)); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{-x}{s}\\
\mathbf{if}\;t\_0 \leq -200:\\
\;\;\;\;\frac{1}{\mathsf{fma}\left(1 - \frac{x}{s}, 1, 1\right)}\\
\mathbf{elif}\;t\_0 \leq 0.05000000074505806:\\
\;\;\;\;\frac{0.25}{s} \cdot x + 0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\left(\frac{0.5}{s \cdot s} \cdot x\right) \cdot x}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -200Initial program 100.0%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f325.0
Applied rewrites5.0%
lift-+.f32N/A
+-commutativeN/A
*-lft-identityN/A
*-commutativeN/A
lower-fma.f32100.0
Applied rewrites99.0%
if -200 < (/.f32 (neg.f32 x) s) < 0.0500000007Initial program 99.7%
unpow1N/A
metadata-evalN/A
sqrt-pow1N/A
pow2N/A
sqrt-prodN/A
lower-*.f32N/A
lower-sqrt.f32N/A
lower-sqrt.f3299.3
Applied rewrites99.3%
rem-square-sqrtN/A
pow1/2N/A
pow1/2N/A
pow2N/A
lower-pow.f32N/A
lift-sqrt.f32N/A
pow1/2N/A
pow-powN/A
lift-exp.f32N/A
pow-expN/A
lower-exp.f32N/A
lower-*.f32N/A
metadata-eval99.6
Applied rewrites99.6%
Taylor expanded in x around 0
associate-*r/N/A
+-commutativeN/A
associate-*l/N/A
metadata-evalN/A
associate-*r/N/A
lower-fma.f32N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f3288.2
Applied rewrites86.8%
Applied rewrites93.9%
if 0.0500000007 < (/.f32 (neg.f32 x) s) Initial program 99.5%
Taylor expanded in x around 0
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
*-commutativeN/A
associate-*l/N/A
associate-*r/N/A
metadata-evalN/A
associate-*r/N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f32N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f32N/A
unpow2N/A
lower-*.f32N/A
lower-/.f326.5
Applied rewrites6.5%
Taylor expanded in x around -inf
Applied rewrites79.9%
Taylor expanded in x around inf
Applied rewrites79.9%
(FPCore (x s) :precision binary32 (if (<= (/ (- x) s) -200.0) (/ 1.0 (fma (- 1.0 (/ x s)) 1.0 1.0)) (/ 1.0 (+ (* (/ (- (/ (* 0.5 x) s) 1.0) s) x) 2.0))))
float code(float x, float s) {
float tmp;
if ((-x / s) <= -200.0f) {
tmp = 1.0f / fmaf((1.0f - (x / s)), 1.0f, 1.0f);
} else {
tmp = 1.0f / ((((((0.5f * x) / s) - 1.0f) / s) * x) + 2.0f);
}
return tmp;
}
function code(x, s) tmp = Float32(0.0) if (Float32(Float32(-x) / s) <= Float32(-200.0)) tmp = Float32(Float32(1.0) / fma(Float32(Float32(1.0) - Float32(x / s)), Float32(1.0), Float32(1.0))); else tmp = Float32(Float32(1.0) / Float32(Float32(Float32(Float32(Float32(Float32(Float32(0.5) * x) / s) - Float32(1.0)) / s) * x) + Float32(2.0))); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{-x}{s} \leq -200:\\
\;\;\;\;\frac{1}{\mathsf{fma}\left(1 - \frac{x}{s}, 1, 1\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{\frac{0.5 \cdot x}{s} - 1}{s} \cdot x + 2}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -200Initial program 100.0%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f325.0
Applied rewrites5.0%
lift-+.f32N/A
+-commutativeN/A
*-lft-identityN/A
*-commutativeN/A
lower-fma.f32100.0
Applied rewrites100.0%
if -200 < (/.f32 (neg.f32 x) s) Initial program 99.6%
Taylor expanded in x around 0
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
*-commutativeN/A
associate-*l/N/A
associate-*r/N/A
metadata-evalN/A
associate-*r/N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f32N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f32N/A
unpow2N/A
lower-*.f32N/A
lower-/.f3239.3
Applied rewrites39.2%
Applied rewrites82.4%
(FPCore (x s) :precision binary32 (if (<= (/ (- x) s) -1.0) (/ 1.0 (* (/ 2.0 x) x)) (/ 1.0 (+ 1.0 (- 1.0 (/ x s))))))
float code(float x, float s) {
float tmp;
if ((-x / s) <= -1.0f) {
tmp = 1.0f / ((2.0f / x) * x);
} else {
tmp = 1.0f / (1.0f + (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) <= (-1.0e0)) then
tmp = 1.0e0 / ((2.0e0 / x) * x)
else
tmp = 1.0e0 / (1.0e0 + (1.0e0 - (x / s)))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(Float32(-x) / s) <= Float32(-1.0)) tmp = Float32(Float32(1.0) / Float32(Float32(Float32(2.0) / x) * x)); else tmp = Float32(Float32(1.0) / Float32(Float32(1.0) + 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(-1.0)) tmp = single(1.0) / ((single(2.0) / x) * x); else tmp = single(1.0) / (single(1.0) + (single(1.0) - (x / s))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{-x}{s} \leq -1:\\
\;\;\;\;\frac{1}{\frac{2}{x} \cdot x}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{1 + \left(1 - \frac{x}{s}\right)}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -1Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
*-commutativeN/A
associate-*l/N/A
associate-*r/N/A
metadata-evalN/A
associate-*r/N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f32N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f32N/A
unpow2N/A
lower-*.f32N/A
lower-/.f3228.2
Applied rewrites27.9%
Taylor expanded in x around -inf
Applied rewrites5.5%
Taylor expanded in x around 0
Applied rewrites28.2%
if -1 < (/.f32 (neg.f32 x) s) Initial program 99.6%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f3263.8
Applied rewrites63.8%
(FPCore (x s) :precision binary32 (if (<= (/ (- x) s) -1.0) (/ 1.0 (* (/ 2.0 x) x)) (/ 1.0 (- 2.0 (/ x s)))))
float code(float x, float s) {
float tmp;
if ((-x / s) <= -1.0f) {
tmp = 1.0f / ((2.0f / x) * x);
} 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) <= (-1.0e0)) then
tmp = 1.0e0 / ((2.0e0 / x) * x)
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(-1.0)) tmp = Float32(Float32(1.0) / Float32(Float32(Float32(2.0) / x) * x)); 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(-1.0)) tmp = single(1.0) / ((single(2.0) / x) * x); 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 -1:\\
\;\;\;\;\frac{1}{\frac{2}{x} \cdot x}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2 - \frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -1Initial program 99.9%
Taylor expanded in x around 0
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
*-commutativeN/A
associate-*l/N/A
associate-*r/N/A
metadata-evalN/A
associate-*r/N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f32N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f32N/A
unpow2N/A
lower-*.f32N/A
lower-/.f3228.2
Applied rewrites27.9%
Taylor expanded in x around -inf
Applied rewrites5.5%
Taylor expanded in x around 0
Applied rewrites28.2%
if -1 < (/.f32 (neg.f32 x) s) Initial program 99.6%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f3263.8
Applied rewrites63.8%
(FPCore (x s) :precision binary32 (if (<= (/ (- x) s) -1.0) 0.5 (/ 1.0 (- 2.0 (/ x s)))))
float code(float x, float s) {
float tmp;
if ((-x / s) <= -1.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) <= (-1.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(-1.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(-1.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 -1:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2 - \frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -1Initial program 99.9%
Taylor expanded in x around 0
Applied rewrites28.2%
if -1 < (/.f32 (neg.f32 x) s) Initial program 99.6%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f3263.8
Applied rewrites63.8%
(FPCore (x s) :precision binary32 (let* ((t_0 (/ (- x) s))) (if (<= t_0 0.05000000074505806) 0.5 (/ 1.0 t_0))))
float code(float x, float s) {
float t_0 = -x / s;
float tmp;
if (t_0 <= 0.05000000074505806f) {
tmp = 0.5f;
} else {
tmp = 1.0f / t_0;
}
return tmp;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: t_0
real(4) :: tmp
t_0 = -x / s
if (t_0 <= 0.05000000074505806e0) then
tmp = 0.5e0
else
tmp = 1.0e0 / t_0
end if
code = tmp
end function
function code(x, s) t_0 = Float32(Float32(-x) / s) tmp = Float32(0.0) if (t_0 <= Float32(0.05000000074505806)) tmp = Float32(0.5); else tmp = Float32(Float32(1.0) / t_0); end return tmp end
function tmp_2 = code(x, s) t_0 = -x / s; tmp = single(0.0); if (t_0 <= single(0.05000000074505806)) tmp = single(0.5); else tmp = single(1.0) / t_0; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{-x}{s}\\
\mathbf{if}\;t\_0 \leq 0.05000000074505806:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{t\_0}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 0.0500000007Initial program 99.9%
Taylor expanded in x around 0
Applied rewrites52.7%
if 0.0500000007 < (/.f32 (neg.f32 x) s) Initial program 99.5%
unpow1N/A
metadata-evalN/A
sqrt-pow1N/A
pow2N/A
sqrt-prodN/A
lower-*.f32N/A
lower-sqrt.f32N/A
lower-sqrt.f3299.5
Applied rewrites99.5%
Taylor expanded in x around 0
fp-cancel-sign-sub-invN/A
metadata-evalN/A
*-lft-identityN/A
lower--.f32N/A
lower-/.f3243.0
Applied rewrites43.0%
Taylor expanded in x around inf
Applied rewrites43.0%
Final simplification49.0%
(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.7%
Taylor expanded in x around 0
Applied rewrites35.2%
herbie shell --seed 2024320
(FPCore (x s)
:name "Logistic function"
:precision binary32
:pre (and (<= 0.0 s) (<= s 1.0651631))
(/ 1.0 (+ 1.0 (exp (/ (- x) s)))))