
(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 16 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 (exp (- (log1p (exp (/ x (- s)))))))
float code(float x, float s) {
return expf(-log1pf(expf((x / -s))));
}
function code(x, s) return exp(Float32(-log1p(exp(Float32(x / Float32(-s)))))) end
\begin{array}{l}
\\
e^{-\mathsf{log1p}\left(e^{\frac{x}{-s}}\right)}
\end{array}
Initial program 99.7%
distribute-frac-neg99.7%
exp-neg99.7%
Applied egg-rr99.7%
Applied egg-rr99.8%
(FPCore (x s) :precision binary32 (/ 1.0 (+ 1.0 (pow (exp -2.0) (* (/ x s) 0.5)))))
float code(float x, float s) {
return 1.0f / (1.0f + powf(expf(-2.0f), ((x / s) * 0.5f)));
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
code = 1.0e0 / (1.0e0 + (exp((-2.0e0)) ** ((x / s) * 0.5e0)))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(1.0) + (exp(Float32(-2.0)) ^ Float32(Float32(x / s) * Float32(0.5))))) end
function tmp = code(x, s) tmp = single(1.0) / (single(1.0) + (exp(single(-2.0)) ^ ((x / s) * single(0.5)))); end
\begin{array}{l}
\\
\frac{1}{1 + {\left(e^{-2}\right)}^{\left(\frac{x}{s} \cdot 0.5\right)}}
\end{array}
Initial program 99.7%
distribute-frac-neg99.7%
exp-neg99.7%
Applied egg-rr99.7%
inv-pow99.7%
pow-exp99.7%
*-commutative99.7%
pow-exp99.7%
sqr-pow99.7%
pow-prod-down99.7%
prod-exp99.8%
metadata-eval99.8%
div-inv99.8%
metadata-eval99.8%
Applied egg-rr99.8%
(FPCore (x s) :precision binary32 (/ 1.0 (+ 1.0 (/ 1.0 (exp (/ x s))))))
float code(float x, float s) {
return 1.0f / (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 + (1.0e0 / exp((x / s))))
end function
function code(x, s) return Float32(Float32(1.0) / Float32(Float32(1.0) + Float32(Float32(1.0) / exp(Float32(x / s))))) end
function tmp = code(x, s) tmp = single(1.0) / (single(1.0) + (single(1.0) / exp((x / s)))); end
\begin{array}{l}
\\
\frac{1}{1 + \frac{1}{e^{\frac{x}{s}}}}
\end{array}
Initial program 99.7%
distribute-frac-neg99.7%
exp-neg99.7%
Applied egg-rr99.7%
(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(x / Float32(-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%
Final simplification99.7%
(FPCore (x s)
:precision binary32
(let* ((t_0 (/ x (- s))))
(if (<= t_0 50.0)
(/ 1.0 (+ 1.0 (/ 1.0 (+ 1.0 (/ x s)))))
(if (<= t_0 4999999990253224000.0)
(/ -1.0 (* x (* (- (* s 2.0) x) (/ -1.0 (* x s)))))
(if (<= t_0 2.0000000818369575e+35)
(/ 1.0 (/ (- 4.0 (* (/ x s) (/ x s))) (+ (/ x s) 2.0)))
(/ 1.0 (/ (- (* (* s 2.0) (/ s x)) s) (* s (/ s x)))))))))
float code(float x, float s) {
float t_0 = x / -s;
float tmp;
if (t_0 <= 50.0f) {
tmp = 1.0f / (1.0f + (1.0f / (1.0f + (x / s))));
} else if (t_0 <= 4999999990253224000.0f) {
tmp = -1.0f / (x * (((s * 2.0f) - x) * (-1.0f / (x * s))));
} else if (t_0 <= 2.0000000818369575e+35f) {
tmp = 1.0f / ((4.0f - ((x / s) * (x / s))) / ((x / s) + 2.0f));
} else {
tmp = 1.0f / ((((s * 2.0f) * (s / x)) - s) / (s * (s / x)));
}
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 <= 50.0e0) then
tmp = 1.0e0 / (1.0e0 + (1.0e0 / (1.0e0 + (x / s))))
else if (t_0 <= 4999999990253224000.0e0) then
tmp = (-1.0e0) / (x * (((s * 2.0e0) - x) * ((-1.0e0) / (x * s))))
else if (t_0 <= 2.0000000818369575e+35) then
tmp = 1.0e0 / ((4.0e0 - ((x / s) * (x / s))) / ((x / s) + 2.0e0))
else
tmp = 1.0e0 / ((((s * 2.0e0) * (s / x)) - s) / (s * (s / x)))
end if
code = tmp
end function
function code(x, s) t_0 = Float32(x / Float32(-s)) tmp = Float32(0.0) if (t_0 <= Float32(50.0)) tmp = Float32(Float32(1.0) / Float32(Float32(1.0) + Float32(Float32(1.0) / Float32(Float32(1.0) + Float32(x / s))))); elseif (t_0 <= Float32(4999999990253224000.0)) tmp = Float32(Float32(-1.0) / Float32(x * Float32(Float32(Float32(s * Float32(2.0)) - x) * Float32(Float32(-1.0) / Float32(x * s))))); elseif (t_0 <= Float32(2.0000000818369575e+35)) tmp = Float32(Float32(1.0) / Float32(Float32(Float32(4.0) - Float32(Float32(x / s) * Float32(x / s))) / Float32(Float32(x / s) + Float32(2.0)))); else tmp = Float32(Float32(1.0) / Float32(Float32(Float32(Float32(s * Float32(2.0)) * Float32(s / x)) - s) / Float32(s * Float32(s / x)))); end return tmp end
function tmp_2 = code(x, s) t_0 = x / -s; tmp = single(0.0); if (t_0 <= single(50.0)) tmp = single(1.0) / (single(1.0) + (single(1.0) / (single(1.0) + (x / s)))); elseif (t_0 <= single(4999999990253224000.0)) tmp = single(-1.0) / (x * (((s * single(2.0)) - x) * (single(-1.0) / (x * s)))); elseif (t_0 <= single(2.0000000818369575e+35)) tmp = single(1.0) / ((single(4.0) - ((x / s) * (x / s))) / ((x / s) + single(2.0))); else tmp = single(1.0) / ((((s * single(2.0)) * (s / x)) - s) / (s * (s / x))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{x}{-s}\\
\mathbf{if}\;t\_0 \leq 50:\\
\;\;\;\;\frac{1}{1 + \frac{1}{1 + \frac{x}{s}}}\\
\mathbf{elif}\;t\_0 \leq 4999999990253224000:\\
\;\;\;\;\frac{-1}{x \cdot \left(\left(s \cdot 2 - x\right) \cdot \frac{-1}{x \cdot s}\right)}\\
\mathbf{elif}\;t\_0 \leq 2.0000000818369575 \cdot 10^{+35}:\\
\;\;\;\;\frac{1}{\frac{4 - \frac{x}{s} \cdot \frac{x}{s}}{\frac{x}{s} + 2}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{\left(s \cdot 2\right) \cdot \frac{s}{x} - s}{s \cdot \frac{s}{x}}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 50Initial program 99.7%
distribute-frac-neg99.7%
exp-neg99.7%
Applied egg-rr99.7%
Taylor expanded in x around 0 95.3%
if 50 < (/.f32 (neg.f32 x) s) < 4.99999999e18Initial program 99.6%
Taylor expanded in x around 0 7.9%
mul-1-neg7.9%
unsub-neg7.9%
Simplified7.9%
Taylor expanded in x around inf 7.9%
associate-*r/7.9%
metadata-eval7.9%
Simplified7.9%
frac-sub31.0%
div-inv45.5%
*-rgt-identity45.5%
*-commutative45.5%
Applied egg-rr45.5%
if 4.99999999e18 < (/.f32 (neg.f32 x) s) < 2.00000008e35Initial program 100.0%
Taylor expanded in x around 0 12.6%
mul-1-neg12.6%
unsub-neg12.6%
Simplified12.6%
*-un-lft-identity12.6%
cancel-sign-sub-inv12.6%
metadata-eval12.6%
add-log-exp100.0%
pow-exp100.0%
flip-+-0.0%
metadata-eval-0.0%
pow-exp-0.0%
add-log-exp-0.0%
neg-mul-1-0.0%
pow-exp-0.0%
add-log-exp-0.0%
neg-mul-1-0.0%
distribute-neg-frac2-0.0%
distribute-neg-frac2-0.0%
pow-exp-0.0%
Applied egg-rr100.0%
if 2.00000008e35 < (/.f32 (neg.f32 x) s) Initial program 100.0%
Taylor expanded in x around 0 87.1%
mul-1-neg87.1%
unsub-neg87.1%
Simplified87.1%
Taylor expanded in s around 0 87.1%
*-commutative87.1%
Simplified87.1%
div-sub87.1%
associate-/l*87.1%
Applied egg-rr87.1%
associate-*r/87.1%
clear-num87.1%
frac-sub100.0%
*-commutative100.0%
*-un-lft-identity100.0%
Applied egg-rr100.0%
Final simplification90.2%
(FPCore (x s) :precision binary32 (if (<= (/ x (- s)) -5.0) 1.0 (/ 1.0 (/ (- (* (* s 2.0) (/ s x)) s) (* s (/ s x))))))
float code(float x, float s) {
float tmp;
if ((x / -s) <= -5.0f) {
tmp = 1.0f;
} else {
tmp = 1.0f / ((((s * 2.0f) * (s / x)) - s) / (s * (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) <= (-5.0e0)) then
tmp = 1.0e0
else
tmp = 1.0e0 / ((((s * 2.0e0) * (s / x)) - s) / (s * (s / x)))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(x / Float32(-s)) <= Float32(-5.0)) tmp = Float32(1.0); else tmp = Float32(Float32(1.0) / Float32(Float32(Float32(Float32(s * Float32(2.0)) * Float32(s / x)) - s) / Float32(s * Float32(s / x)))); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if ((x / -s) <= single(-5.0)) tmp = single(1.0); else tmp = single(1.0) / ((((s * single(2.0)) * (s / x)) - s) / (s * (s / x))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{-s} \leq -5:\\
\;\;\;\;1\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{\left(s \cdot 2\right) \cdot \frac{s}{x} - s}{s \cdot \frac{s}{x}}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -5Initial program 100.0%
distribute-frac-neg100.0%
exp-neg100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 96.7%
Taylor expanded in x around inf 96.7%
mul-1-neg96.7%
unsub-neg96.7%
Simplified96.7%
Taylor expanded in s around 0 99.1%
if -5 < (/.f32 (neg.f32 x) s) Initial program 99.6%
Taylor expanded in x around 0 58.8%
mul-1-neg58.8%
unsub-neg58.8%
Simplified58.8%
Taylor expanded in s around 0 58.7%
*-commutative58.7%
Simplified58.7%
div-sub58.8%
associate-/l*59.2%
Applied egg-rr59.2%
associate-*r/58.8%
clear-num58.8%
frac-sub73.5%
*-commutative73.5%
*-un-lft-identity73.5%
Applied egg-rr73.5%
Final simplification83.4%
(FPCore (x s)
:precision binary32
(let* ((t_0 (/ x (- s))))
(if (<= t_0 -5.0)
1.0
(if (<= t_0 0.20000000298023224)
(+ 0.5 (/ (* x 0.25) s))
(/ -1.0 (/ x s))))))
float code(float x, float s) {
float t_0 = x / -s;
float tmp;
if (t_0 <= -5.0f) {
tmp = 1.0f;
} else if (t_0 <= 0.20000000298023224f) {
tmp = 0.5f + ((x * 0.25f) / s);
} 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) :: t_0
real(4) :: tmp
t_0 = x / -s
if (t_0 <= (-5.0e0)) then
tmp = 1.0e0
else if (t_0 <= 0.20000000298023224e0) then
tmp = 0.5e0 + ((x * 0.25e0) / s)
else
tmp = (-1.0e0) / (x / s)
end if
code = tmp
end function
function code(x, s) t_0 = Float32(x / Float32(-s)) tmp = Float32(0.0) if (t_0 <= Float32(-5.0)) tmp = Float32(1.0); elseif (t_0 <= Float32(0.20000000298023224)) tmp = Float32(Float32(0.5) + Float32(Float32(x * Float32(0.25)) / s)); else tmp = Float32(Float32(-1.0) / Float32(x / s)); end return tmp end
function tmp_2 = code(x, s) t_0 = x / -s; tmp = single(0.0); if (t_0 <= single(-5.0)) tmp = single(1.0); elseif (t_0 <= single(0.20000000298023224)) tmp = single(0.5) + ((x * single(0.25)) / s); else tmp = single(-1.0) / (x / s); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{x}{-s}\\
\mathbf{if}\;t\_0 \leq -5:\\
\;\;\;\;1\\
\mathbf{elif}\;t\_0 \leq 0.20000000298023224:\\
\;\;\;\;0.5 + \frac{x \cdot 0.25}{s}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{\frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -5Initial program 100.0%
distribute-frac-neg100.0%
exp-neg100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 96.7%
Taylor expanded in x around inf 96.7%
mul-1-neg96.7%
unsub-neg96.7%
Simplified96.7%
Taylor expanded in s around 0 99.1%
if -5 < (/.f32 (neg.f32 x) s) < 0.200000003Initial program 99.4%
Taylor expanded in x around 0 99.4%
associate-*r/99.4%
*-commutative99.4%
Simplified99.4%
if 0.200000003 < (/.f32 (neg.f32 x) s) Initial program 99.7%
Taylor expanded in x around 0 33.9%
mul-1-neg33.9%
unsub-neg33.9%
Simplified33.9%
Taylor expanded in x around inf 33.8%
mul-1-neg33.8%
distribute-frac-neg233.8%
Simplified33.8%
Final simplification75.0%
(FPCore (x s) :precision binary32 (if (<= (/ x (- s)) 50.0) (/ 1.0 (+ 1.0 (/ 1.0 (+ 1.0 (/ x s))))) (/ -1.0 (* x (* (- (* s 2.0) x) (/ -1.0 (* x s)))))))
float code(float x, float s) {
float tmp;
if ((x / -s) <= 50.0f) {
tmp = 1.0f / (1.0f + (1.0f / (1.0f + (x / s))));
} else {
tmp = -1.0f / (x * (((s * 2.0f) - x) * (-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) <= 50.0e0) then
tmp = 1.0e0 / (1.0e0 + (1.0e0 / (1.0e0 + (x / s))))
else
tmp = (-1.0e0) / (x * (((s * 2.0e0) - x) * ((-1.0e0) / (x * s))))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(x / Float32(-s)) <= Float32(50.0)) tmp = Float32(Float32(1.0) / Float32(Float32(1.0) + Float32(Float32(1.0) / Float32(Float32(1.0) + Float32(x / s))))); else tmp = Float32(Float32(-1.0) / Float32(x * Float32(Float32(Float32(s * Float32(2.0)) - x) * 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(50.0)) tmp = single(1.0) / (single(1.0) + (single(1.0) / (single(1.0) + (x / s)))); else tmp = single(-1.0) / (x * (((s * single(2.0)) - x) * (single(-1.0) / (x * s)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{-s} \leq 50:\\
\;\;\;\;\frac{1}{1 + \frac{1}{1 + \frac{x}{s}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{x \cdot \left(\left(s \cdot 2 - x\right) \cdot \frac{-1}{x \cdot s}\right)}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < 50Initial program 99.7%
distribute-frac-neg99.7%
exp-neg99.7%
Applied egg-rr99.7%
Taylor expanded in x around 0 95.3%
if 50 < (/.f32 (neg.f32 x) s) Initial program 99.9%
Taylor expanded in x around 0 34.4%
mul-1-neg34.4%
unsub-neg34.4%
Simplified34.4%
Taylor expanded in x around inf 34.4%
associate-*r/34.4%
metadata-eval34.4%
Simplified34.4%
frac-sub45.4%
div-inv52.3%
*-rgt-identity52.3%
*-commutative52.3%
Applied egg-rr52.3%
Final simplification79.9%
(FPCore (x s)
:precision binary32
(let* ((t_0 (/ x (- s))))
(if (<= t_0 -5.0)
1.0
(if (<= t_0 0.20000000298023224) 0.5 (/ -1.0 (/ x s))))))
float code(float x, float s) {
float t_0 = x / -s;
float tmp;
if (t_0 <= -5.0f) {
tmp = 1.0f;
} else if (t_0 <= 0.20000000298023224f) {
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) :: t_0
real(4) :: tmp
t_0 = x / -s
if (t_0 <= (-5.0e0)) then
tmp = 1.0e0
else if (t_0 <= 0.20000000298023224e0) then
tmp = 0.5e0
else
tmp = (-1.0e0) / (x / s)
end if
code = tmp
end function
function code(x, s) t_0 = Float32(x / Float32(-s)) tmp = Float32(0.0) if (t_0 <= Float32(-5.0)) tmp = Float32(1.0); elseif (t_0 <= Float32(0.20000000298023224)) tmp = Float32(0.5); else tmp = Float32(Float32(-1.0) / Float32(x / s)); end return tmp end
function tmp_2 = code(x, s) t_0 = x / -s; tmp = single(0.0); if (t_0 <= single(-5.0)) tmp = single(1.0); elseif (t_0 <= single(0.20000000298023224)) tmp = single(0.5); else tmp = single(-1.0) / (x / s); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{x}{-s}\\
\mathbf{if}\;t\_0 \leq -5:\\
\;\;\;\;1\\
\mathbf{elif}\;t\_0 \leq 0.20000000298023224:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;\frac{-1}{\frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -5Initial program 100.0%
distribute-frac-neg100.0%
exp-neg100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 96.7%
Taylor expanded in x around inf 96.7%
mul-1-neg96.7%
unsub-neg96.7%
Simplified96.7%
Taylor expanded in s around 0 99.1%
if -5 < (/.f32 (neg.f32 x) s) < 0.200000003Initial program 99.4%
Taylor expanded in x around 0 89.5%
if 0.200000003 < (/.f32 (neg.f32 x) s) Initial program 99.7%
Taylor expanded in x around 0 33.9%
mul-1-neg33.9%
unsub-neg33.9%
Simplified33.9%
Taylor expanded in x around inf 33.8%
mul-1-neg33.8%
distribute-frac-neg233.8%
Simplified33.8%
Final simplification72.5%
(FPCore (x s) :precision binary32 (if (<= (/ x (- s)) -5.0) 1.0 (/ 1.0 (- (* s (/ 2.0 s)) (/ x s)))))
float code(float x, float s) {
float tmp;
if ((x / -s) <= -5.0f) {
tmp = 1.0f;
} else {
tmp = 1.0f / ((s * (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 ((x / -s) <= (-5.0e0)) then
tmp = 1.0e0
else
tmp = 1.0e0 / ((s * (2.0e0 / s)) - (x / s))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(x / Float32(-s)) <= Float32(-5.0)) tmp = Float32(1.0); else tmp = Float32(Float32(1.0) / Float32(Float32(s * Float32(Float32(2.0) / s)) - 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(1.0); else tmp = single(1.0) / ((s * (single(2.0) / s)) - (x / s)); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\frac{x}{-s} \leq -5:\\
\;\;\;\;1\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{s \cdot \frac{2}{s} - \frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -5Initial program 100.0%
distribute-frac-neg100.0%
exp-neg100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 96.7%
Taylor expanded in x around inf 96.7%
mul-1-neg96.7%
unsub-neg96.7%
Simplified96.7%
Taylor expanded in s around 0 99.1%
if -5 < (/.f32 (neg.f32 x) s) Initial program 99.6%
Taylor expanded in x around 0 58.8%
mul-1-neg58.8%
unsub-neg58.8%
Simplified58.8%
Taylor expanded in s around 0 58.7%
*-commutative58.7%
Simplified58.7%
div-sub58.8%
associate-/l*59.2%
Applied egg-rr59.2%
Final simplification74.6%
(FPCore (x s) :precision binary32 (if (<= x -4.9999998413276127e-20) (/ -1.0 (/ (* x (- x (* s 2.0))) (* x s))) (/ 1.0 (+ 1.0 (/ 1.0 (+ 1.0 (/ x s)))))))
float code(float x, float s) {
float tmp;
if (x <= -4.9999998413276127e-20f) {
tmp = -1.0f / ((x * (x - (s * 2.0f))) / (x * s));
} else {
tmp = 1.0f / (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 <= (-4.9999998413276127e-20)) then
tmp = (-1.0e0) / ((x * (x - (s * 2.0e0))) / (x * s))
else
tmp = 1.0e0 / (1.0e0 + (1.0e0 / (1.0e0 + (x / s))))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (x <= Float32(-4.9999998413276127e-20)) tmp = Float32(Float32(-1.0) / Float32(Float32(x * Float32(x - Float32(s * Float32(2.0)))) / Float32(x * s))); else tmp = Float32(Float32(1.0) / 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 <= single(-4.9999998413276127e-20)) tmp = single(-1.0) / ((x * (x - (s * single(2.0)))) / (x * s)); else tmp = single(1.0) / (single(1.0) + (single(1.0) / (single(1.0) + (x / s)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -4.9999998413276127 \cdot 10^{-20}:\\
\;\;\;\;\frac{-1}{\frac{x \cdot \left(x - s \cdot 2\right)}{x \cdot s}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{1 + \frac{1}{1 + \frac{x}{s}}}\\
\end{array}
\end{array}
if x < -4.99999984e-20Initial program 99.7%
Taylor expanded in x around 0 41.6%
mul-1-neg41.6%
unsub-neg41.6%
Simplified41.6%
Taylor expanded in x around inf 41.6%
associate-*r/41.6%
metadata-eval41.6%
Simplified41.6%
*-commutative41.6%
frac-sub48.0%
associate-*l/56.3%
*-rgt-identity56.3%
*-commutative56.3%
Applied egg-rr56.3%
if -4.99999984e-20 < x Initial program 99.7%
distribute-frac-neg99.7%
exp-neg99.7%
Applied egg-rr99.7%
Taylor expanded in x around 0 93.9%
Final simplification79.2%
(FPCore (x s) :precision binary32 (if (<= x -4.9999998413276127e-20) (* (* x s) (/ 1.0 (* x (- (* s 2.0) x)))) (/ 1.0 (+ 1.0 (/ 1.0 (+ 1.0 (/ x s)))))))
float code(float x, float s) {
float tmp;
if (x <= -4.9999998413276127e-20f) {
tmp = (x * s) * (1.0f / (x * ((s * 2.0f) - x)));
} else {
tmp = 1.0f / (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 <= (-4.9999998413276127e-20)) then
tmp = (x * s) * (1.0e0 / (x * ((s * 2.0e0) - x)))
else
tmp = 1.0e0 / (1.0e0 + (1.0e0 / (1.0e0 + (x / s))))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (x <= Float32(-4.9999998413276127e-20)) tmp = Float32(Float32(x * s) * Float32(Float32(1.0) / Float32(x * Float32(Float32(s * Float32(2.0)) - x)))); else tmp = Float32(Float32(1.0) / 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 <= single(-4.9999998413276127e-20)) tmp = (x * s) * (single(1.0) / (x * ((s * single(2.0)) - x))); else tmp = single(1.0) / (single(1.0) + (single(1.0) / (single(1.0) + (x / s)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -4.9999998413276127 \cdot 10^{-20}:\\
\;\;\;\;\left(x \cdot s\right) \cdot \frac{1}{x \cdot \left(s \cdot 2 - x\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{1 + \frac{1}{1 + \frac{x}{s}}}\\
\end{array}
\end{array}
if x < -4.99999984e-20Initial program 99.7%
Taylor expanded in x around 0 41.6%
mul-1-neg41.6%
unsub-neg41.6%
Simplified41.6%
Taylor expanded in x around inf 41.6%
associate-*r/41.6%
metadata-eval41.6%
Simplified41.6%
associate-/r*39.7%
frac-sub46.0%
associate-/r/53.6%
*-rgt-identity53.6%
*-commutative53.6%
Applied egg-rr53.6%
associate-/l/55.4%
*-commutative55.4%
*-commutative55.4%
Simplified55.4%
if -4.99999984e-20 < x Initial program 99.7%
distribute-frac-neg99.7%
exp-neg99.7%
Applied egg-rr99.7%
Taylor expanded in x around 0 93.9%
Final simplification78.8%
(FPCore (x s) :precision binary32 (if (<= (/ x (- s)) -5.0) 1.0 (/ 1.0 (- 2.0 (/ x s)))))
float code(float x, float s) {
float tmp;
if ((x / -s) <= -5.0f) {
tmp = 1.0f;
} 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 = 1.0e0
else
tmp = 1.0e0 / (2.0e0 - (x / s))
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (Float32(x / Float32(-s)) <= Float32(-5.0)) tmp = Float32(1.0); 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(1.0); 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:\\
\;\;\;\;1\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{2 - \frac{x}{s}}\\
\end{array}
\end{array}
if (/.f32 (neg.f32 x) s) < -5Initial program 100.0%
distribute-frac-neg100.0%
exp-neg100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 96.7%
Taylor expanded in x around inf 96.7%
mul-1-neg96.7%
unsub-neg96.7%
Simplified96.7%
Taylor expanded in s around 0 99.1%
if -5 < (/.f32 (neg.f32 x) s) Initial program 99.6%
Taylor expanded in x around 0 58.8%
mul-1-neg58.8%
unsub-neg58.8%
Simplified58.8%
Final simplification74.4%
(FPCore (x s) :precision binary32 (if (<= x -0.009999999776482582) (/ s (- x)) (if (<= x 5.0000000843119176e-17) 0.5 1.0)))
float code(float x, float s) {
float tmp;
if (x <= -0.009999999776482582f) {
tmp = s / -x;
} else if (x <= 5.0000000843119176e-17f) {
tmp = 0.5f;
} else {
tmp = 1.0f;
}
return tmp;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: tmp
if (x <= (-0.009999999776482582e0)) then
tmp = s / -x
else if (x <= 5.0000000843119176e-17) then
tmp = 0.5e0
else
tmp = 1.0e0
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (x <= Float32(-0.009999999776482582)) tmp = Float32(s / Float32(-x)); elseif (x <= Float32(5.0000000843119176e-17)) tmp = Float32(0.5); else tmp = Float32(1.0); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (x <= single(-0.009999999776482582)) tmp = s / -x; elseif (x <= single(5.0000000843119176e-17)) tmp = single(0.5); else tmp = single(1.0); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -0.009999999776482582:\\
\;\;\;\;\frac{s}{-x}\\
\mathbf{elif}\;x \leq 5.0000000843119176 \cdot 10^{-17}:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;1\\
\end{array}
\end{array}
if x < -0.00999999978Initial program 100.0%
Taylor expanded in x around 0 47.4%
mul-1-neg47.4%
unsub-neg47.4%
Simplified47.4%
Taylor expanded in x around inf 44.3%
associate-*r/44.3%
neg-mul-144.3%
Simplified44.3%
if -0.00999999978 < x < 5.00000008e-17Initial program 99.3%
Taylor expanded in x around 0 57.0%
if 5.00000008e-17 < x Initial program 100.0%
distribute-frac-neg100.0%
exp-neg100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 98.4%
Taylor expanded in x around inf 93.6%
mul-1-neg93.6%
unsub-neg93.6%
Simplified93.6%
Taylor expanded in s around 0 95.9%
Final simplification68.9%
(FPCore (x s) :precision binary32 (if (<= x 5.0000000843119176e-17) 0.5 1.0))
float code(float x, float s) {
float tmp;
if (x <= 5.0000000843119176e-17f) {
tmp = 0.5f;
} else {
tmp = 1.0f;
}
return tmp;
}
real(4) function code(x, s)
real(4), intent (in) :: x
real(4), intent (in) :: s
real(4) :: tmp
if (x <= 5.0000000843119176e-17) then
tmp = 0.5e0
else
tmp = 1.0e0
end if
code = tmp
end function
function code(x, s) tmp = Float32(0.0) if (x <= Float32(5.0000000843119176e-17)) tmp = Float32(0.5); else tmp = Float32(1.0); end return tmp end
function tmp_2 = code(x, s) tmp = single(0.0); if (x <= single(5.0000000843119176e-17)) tmp = single(0.5); else tmp = single(1.0); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 5.0000000843119176 \cdot 10^{-17}:\\
\;\;\;\;0.5\\
\mathbf{else}:\\
\;\;\;\;1\\
\end{array}
\end{array}
if x < 5.00000008e-17Initial program 99.6%
Taylor expanded in x around 0 37.5%
if 5.00000008e-17 < x Initial program 100.0%
distribute-frac-neg100.0%
exp-neg100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 98.4%
Taylor expanded in x around inf 93.6%
mul-1-neg93.6%
unsub-neg93.6%
Simplified93.6%
Taylor expanded in s around 0 95.9%
(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 35.0%
herbie shell --seed 2024086
(FPCore (x s)
:name "Logistic function"
:precision binary32
:pre (and (<= 0.0 s) (<= s 1.0651631))
(/ 1.0 (+ 1.0 (exp (/ (- x) s)))))