
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(let* ((t_0 (/ 1.0 (sin normAngle))))
(+
(* (* (sin (* (- 1.0 u) normAngle)) t_0) n0_i)
(* (* (sin (* u normAngle)) t_0) n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float t_0 = 1.0f / sinf(normAngle);
return ((sinf(((1.0f - u) * normAngle)) * t_0) * n0_i) + ((sinf((u * normAngle)) * t_0) * n1_i);
}
real(4) function code(normangle, u, n0_i, n1_i)
real(4), intent (in) :: normangle
real(4), intent (in) :: u
real(4), intent (in) :: n0_i
real(4), intent (in) :: n1_i
real(4) :: t_0
t_0 = 1.0e0 / sin(normangle)
code = ((sin(((1.0e0 - u) * normangle)) * t_0) * n0_i) + ((sin((u * normangle)) * t_0) * n1_i)
end function
function code(normAngle, u, n0_i, n1_i) t_0 = Float32(Float32(1.0) / sin(normAngle)) return Float32(Float32(Float32(sin(Float32(Float32(Float32(1.0) - u) * normAngle)) * t_0) * n0_i) + Float32(Float32(sin(Float32(u * normAngle)) * t_0) * n1_i)) end
function tmp = code(normAngle, u, n0_i, n1_i) t_0 = single(1.0) / sin(normAngle); tmp = ((sin(((single(1.0) - u) * normAngle)) * t_0) * n0_i) + ((sin((u * normAngle)) * t_0) * n1_i); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{1}{\sin normAngle}\\
\left(\sin \left(\left(1 - u\right) \cdot normAngle\right) \cdot t\_0\right) \cdot n0\_i + \left(\sin \left(u \cdot normAngle\right) \cdot t\_0\right) \cdot n1\_i
\end{array}
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 7 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(let* ((t_0 (/ 1.0 (sin normAngle))))
(+
(* (* (sin (* (- 1.0 u) normAngle)) t_0) n0_i)
(* (* (sin (* u normAngle)) t_0) n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float t_0 = 1.0f / sinf(normAngle);
return ((sinf(((1.0f - u) * normAngle)) * t_0) * n0_i) + ((sinf((u * normAngle)) * t_0) * n1_i);
}
real(4) function code(normangle, u, n0_i, n1_i)
real(4), intent (in) :: normangle
real(4), intent (in) :: u
real(4), intent (in) :: n0_i
real(4), intent (in) :: n1_i
real(4) :: t_0
t_0 = 1.0e0 / sin(normangle)
code = ((sin(((1.0e0 - u) * normangle)) * t_0) * n0_i) + ((sin((u * normangle)) * t_0) * n1_i)
end function
function code(normAngle, u, n0_i, n1_i) t_0 = Float32(Float32(1.0) / sin(normAngle)) return Float32(Float32(Float32(sin(Float32(Float32(Float32(1.0) - u) * normAngle)) * t_0) * n0_i) + Float32(Float32(sin(Float32(u * normAngle)) * t_0) * n1_i)) end
function tmp = code(normAngle, u, n0_i, n1_i) t_0 = single(1.0) / sin(normAngle); tmp = ((sin(((single(1.0) - u) * normAngle)) * t_0) * n0_i) + ((sin((u * normAngle)) * t_0) * n1_i); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{1}{\sin normAngle}\\
\left(\sin \left(\left(1 - u\right) \cdot normAngle\right) \cdot t\_0\right) \cdot n0\_i + \left(\sin \left(u \cdot normAngle\right) \cdot t\_0\right) \cdot n1\_i
\end{array}
\end{array}
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ (* (pow normAngle 2.0) (* (* u 0.16666666666666666) n1_i)) (+ (* n0_i (- 1.0 u)) (* u n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return (powf(normAngle, 2.0f) * ((u * 0.16666666666666666f) * n1_i)) + ((n0_i * (1.0f - u)) + (u * n1_i));
}
real(4) function code(normangle, u, n0_i, n1_i)
real(4), intent (in) :: normangle
real(4), intent (in) :: u
real(4), intent (in) :: n0_i
real(4), intent (in) :: n1_i
code = ((normangle ** 2.0e0) * ((u * 0.16666666666666666e0) * n1_i)) + ((n0_i * (1.0e0 - u)) + (u * n1_i))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(Float32((normAngle ^ Float32(2.0)) * Float32(Float32(u * Float32(0.16666666666666666)) * n1_i)) + Float32(Float32(n0_i * Float32(Float32(1.0) - u)) + Float32(u * n1_i))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = ((normAngle ^ single(2.0)) * ((u * single(0.16666666666666666)) * n1_i)) + ((n0_i * (single(1.0) - u)) + (u * n1_i)); end
\begin{array}{l}
\\
{normAngle}^{2} \cdot \left(\left(u \cdot 0.16666666666666666\right) \cdot n1\_i\right) + \left(n0\_i \cdot \left(1 - u\right) + u \cdot n1\_i\right)
\end{array}
Initial program 97.5%
associate-*l*97.4%
cancel-sign-sub97.4%
*-commutative97.4%
associate-*r*82.0%
associate-*r/82.0%
*-rgt-identity82.0%
sin-neg82.0%
distribute-lft-neg-out82.0%
associate-*l*82.1%
*-commutative82.1%
distribute-lft-neg-out82.1%
distribute-rgt-neg-out82.1%
associate-*r/82.3%
Simplified76.6%
Taylor expanded in normAngle around 0 74.4%
Taylor expanded in normAngle around 0 96.6%
Taylor expanded in n0_i around 0 98.6%
*-commutative98.6%
*-commutative98.6%
associate-*r*98.6%
*-commutative98.6%
associate-*l*98.6%
metadata-eval98.6%
distribute-rgt-neg-in98.6%
*-commutative98.6%
distribute-lft-neg-in98.6%
metadata-eval98.6%
*-commutative98.6%
associate-*r*98.6%
*-commutative98.6%
Simplified98.6%
Final simplification98.6%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (fma u (- n1_i n0_i) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, (n1_i - n0_i), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, Float32(n1_i - n0_i), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, n1\_i - n0\_i, n0\_i\right)
\end{array}
Initial program 97.5%
Taylor expanded in u around 0 93.7%
mul-1-neg93.7%
unsub-neg93.7%
associate-/l*97.8%
associate-/l*97.8%
Simplified97.8%
Taylor expanded in normAngle around 0 97.7%
sub-neg97.7%
associate-+r+97.8%
mul-1-neg97.8%
associate-*r*97.8%
distribute-rgt-in97.7%
+-commutative97.7%
fma-define97.9%
mul-1-neg97.9%
unsub-neg97.9%
Simplified97.9%
Final simplification97.9%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (or (<= n1_i -2.000000033724767e-16) (not (<= n1_i 9.9999998245167e-15))) (* u n1_i) (* n0_i (- 1.0 u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n1_i <= -2.000000033724767e-16f) || !(n1_i <= 9.9999998245167e-15f)) {
tmp = u * n1_i;
} else {
tmp = n0_i * (1.0f - u);
}
return tmp;
}
real(4) function code(normangle, u, n0_i, n1_i)
real(4), intent (in) :: normangle
real(4), intent (in) :: u
real(4), intent (in) :: n0_i
real(4), intent (in) :: n1_i
real(4) :: tmp
if ((n1_i <= (-2.000000033724767e-16)) .or. (.not. (n1_i <= 9.9999998245167e-15))) then
tmp = u * n1_i
else
tmp = n0_i * (1.0e0 - u)
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if ((n1_i <= Float32(-2.000000033724767e-16)) || !(n1_i <= Float32(9.9999998245167e-15))) tmp = Float32(u * n1_i); else tmp = Float32(n0_i * Float32(Float32(1.0) - u)); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if ((n1_i <= single(-2.000000033724767e-16)) || ~((n1_i <= single(9.9999998245167e-15)))) tmp = u * n1_i; else tmp = n0_i * (single(1.0) - u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -2.000000033724767 \cdot 10^{-16} \lor \neg \left(n1\_i \leq 9.9999998245167 \cdot 10^{-15}\right):\\
\;\;\;\;u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i \cdot \left(1 - u\right)\\
\end{array}
\end{array}
if n1_i < -2.00000003e-16 or 9.99999982e-15 < n1_i Initial program 95.4%
associate-*l*95.4%
cancel-sign-sub95.4%
*-commutative95.4%
associate-*r*92.4%
associate-*r/92.5%
*-rgt-identity92.5%
sin-neg92.5%
distribute-lft-neg-out92.5%
associate-*l*92.6%
*-commutative92.6%
distribute-lft-neg-out92.6%
distribute-rgt-neg-out92.6%
associate-*r/93.0%
Simplified85.6%
Taylor expanded in normAngle around 0 84.1%
Taylor expanded in n0_i around 0 63.8%
*-commutative63.8%
*-commutative63.8%
associate-*r*63.9%
Simplified63.9%
Taylor expanded in normAngle around 0 72.5%
*-commutative72.5%
Simplified72.5%
if -2.00000003e-16 < n1_i < 9.99999982e-15Initial program 98.8%
Taylor expanded in u around 0 92.9%
mul-1-neg92.9%
unsub-neg92.9%
associate-/l*99.3%
associate-/l*99.3%
Simplified99.3%
Taylor expanded in normAngle around 0 99.4%
Taylor expanded in n0_i around inf 78.8%
Final simplification76.3%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (or (<= n1_i -2.000000033724767e-16) (not (<= n1_i 9.9999998245167e-15))) (* u n1_i) (- n0_i (* u n0_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n1_i <= -2.000000033724767e-16f) || !(n1_i <= 9.9999998245167e-15f)) {
tmp = u * n1_i;
} else {
tmp = n0_i - (u * n0_i);
}
return tmp;
}
real(4) function code(normangle, u, n0_i, n1_i)
real(4), intent (in) :: normangle
real(4), intent (in) :: u
real(4), intent (in) :: n0_i
real(4), intent (in) :: n1_i
real(4) :: tmp
if ((n1_i <= (-2.000000033724767e-16)) .or. (.not. (n1_i <= 9.9999998245167e-15))) then
tmp = u * n1_i
else
tmp = n0_i - (u * n0_i)
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if ((n1_i <= Float32(-2.000000033724767e-16)) || !(n1_i <= Float32(9.9999998245167e-15))) tmp = Float32(u * n1_i); else tmp = Float32(n0_i - Float32(u * n0_i)); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if ((n1_i <= single(-2.000000033724767e-16)) || ~((n1_i <= single(9.9999998245167e-15)))) tmp = u * n1_i; else tmp = n0_i - (u * n0_i); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -2.000000033724767 \cdot 10^{-16} \lor \neg \left(n1\_i \leq 9.9999998245167 \cdot 10^{-15}\right):\\
\;\;\;\;u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i - u \cdot n0\_i\\
\end{array}
\end{array}
if n1_i < -2.00000003e-16 or 9.99999982e-15 < n1_i Initial program 95.4%
associate-*l*95.4%
cancel-sign-sub95.4%
*-commutative95.4%
associate-*r*92.4%
associate-*r/92.5%
*-rgt-identity92.5%
sin-neg92.5%
distribute-lft-neg-out92.5%
associate-*l*92.6%
*-commutative92.6%
distribute-lft-neg-out92.6%
distribute-rgt-neg-out92.6%
associate-*r/93.0%
Simplified85.6%
Taylor expanded in normAngle around 0 84.1%
Taylor expanded in n0_i around 0 63.8%
*-commutative63.8%
*-commutative63.8%
associate-*r*63.9%
Simplified63.9%
Taylor expanded in normAngle around 0 72.5%
*-commutative72.5%
Simplified72.5%
if -2.00000003e-16 < n1_i < 9.99999982e-15Initial program 98.8%
Taylor expanded in u around 0 92.9%
mul-1-neg92.9%
unsub-neg92.9%
associate-/l*99.3%
associate-/l*99.3%
Simplified99.3%
Taylor expanded in normAngle around 0 99.4%
Taylor expanded in n1_i around 0 79.0%
Final simplification76.4%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (or (<= n1_i -2.000000033724767e-16) (not (<= n1_i 9.9999998245167e-15))) (* u n1_i) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n1_i <= -2.000000033724767e-16f) || !(n1_i <= 9.9999998245167e-15f)) {
tmp = u * n1_i;
} else {
tmp = n0_i;
}
return tmp;
}
real(4) function code(normangle, u, n0_i, n1_i)
real(4), intent (in) :: normangle
real(4), intent (in) :: u
real(4), intent (in) :: n0_i
real(4), intent (in) :: n1_i
real(4) :: tmp
if ((n1_i <= (-2.000000033724767e-16)) .or. (.not. (n1_i <= 9.9999998245167e-15))) then
tmp = u * n1_i
else
tmp = n0_i
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if ((n1_i <= Float32(-2.000000033724767e-16)) || !(n1_i <= Float32(9.9999998245167e-15))) tmp = Float32(u * n1_i); else tmp = n0_i; end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if ((n1_i <= single(-2.000000033724767e-16)) || ~((n1_i <= single(9.9999998245167e-15)))) tmp = u * n1_i; else tmp = n0_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -2.000000033724767 \cdot 10^{-16} \lor \neg \left(n1\_i \leq 9.9999998245167 \cdot 10^{-15}\right):\\
\;\;\;\;u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i\\
\end{array}
\end{array}
if n1_i < -2.00000003e-16 or 9.99999982e-15 < n1_i Initial program 95.4%
associate-*l*95.4%
cancel-sign-sub95.4%
*-commutative95.4%
associate-*r*92.4%
associate-*r/92.5%
*-rgt-identity92.5%
sin-neg92.5%
distribute-lft-neg-out92.5%
associate-*l*92.6%
*-commutative92.6%
distribute-lft-neg-out92.6%
distribute-rgt-neg-out92.6%
associate-*r/93.0%
Simplified85.6%
Taylor expanded in normAngle around 0 84.1%
Taylor expanded in n0_i around 0 63.8%
*-commutative63.8%
*-commutative63.8%
associate-*r*63.9%
Simplified63.9%
Taylor expanded in normAngle around 0 72.5%
*-commutative72.5%
Simplified72.5%
if -2.00000003e-16 < n1_i < 9.99999982e-15Initial program 98.8%
fma-define98.8%
associate-*r/99.1%
*-rgt-identity99.1%
associate-*r/99.3%
*-rgt-identity99.3%
Simplified99.3%
Taylor expanded in u around 0 63.9%
Final simplification67.3%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (* u (- n1_i n0_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + (u * (n1_i - n0_i));
}
real(4) function code(normangle, u, n0_i, n1_i)
real(4), intent (in) :: normangle
real(4), intent (in) :: u
real(4), intent (in) :: n0_i
real(4), intent (in) :: n1_i
code = n0_i + (u * (n1_i - n0_i))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(u * Float32(n1_i - n0_i))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (u * (n1_i - n0_i)); end
\begin{array}{l}
\\
n0\_i + u \cdot \left(n1\_i - n0\_i\right)
\end{array}
Initial program 97.5%
Taylor expanded in u around 0 93.7%
mul-1-neg93.7%
unsub-neg93.7%
associate-/l*97.8%
associate-/l*97.8%
Simplified97.8%
div-inv98.1%
clear-num98.0%
Applied egg-rr98.0%
Taylor expanded in normAngle around 0 97.7%
cancel-sign-sub-inv97.7%
associate-+l+97.8%
distribute-rgt-in97.7%
unsub-neg97.7%
Simplified97.7%
Final simplification97.7%
(FPCore (normAngle u n0_i n1_i) :precision binary32 n0_i)
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i;
}
real(4) function code(normangle, u, n0_i, n1_i)
real(4), intent (in) :: normangle
real(4), intent (in) :: u
real(4), intent (in) :: n0_i
real(4), intent (in) :: n1_i
code = n0_i
end function
function code(normAngle, u, n0_i, n1_i) return n0_i end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i; end
\begin{array}{l}
\\
n0\_i
\end{array}
Initial program 97.5%
fma-define97.5%
associate-*r/97.7%
*-rgt-identity97.7%
associate-*r/98.0%
*-rgt-identity98.0%
Simplified98.0%
Taylor expanded in u around 0 47.8%
Final simplification47.8%
herbie shell --seed 2024046
(FPCore (normAngle u n0_i n1_i)
:name "Curve intersection, scale width based on ribbon orientation"
:precision binary32
:pre (and (and (and (and (<= 0.0 normAngle) (<= normAngle (/ PI 2.0))) (and (<= -1.0 n0_i) (<= n0_i 1.0))) (and (<= -1.0 n1_i) (<= n1_i 1.0))) (and (<= 2.328306437e-10 u) (<= u 1.0)))
(+ (* (* (sin (* (- 1.0 u) normAngle)) (/ 1.0 (sin normAngle))) n0_i) (* (* (sin (* u normAngle)) (/ 1.0 (sin normAngle))) n1_i)))