
(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 8 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
(fma
u
(-
(+
n1_i
(*
(* normAngle normAngle)
(- (* 0.3333333333333333 n0_i) (* n1_i -0.16666666666666666))))
n0_i)
n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, ((n1_i + ((normAngle * normAngle) * ((0.3333333333333333f * n0_i) - (n1_i * -0.16666666666666666f)))) - n0_i), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, Float32(Float32(n1_i + Float32(Float32(normAngle * normAngle) * Float32(Float32(Float32(0.3333333333333333) * n0_i) - Float32(n1_i * Float32(-0.16666666666666666))))) - n0_i), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, \left(n1\_i + \left(normAngle \cdot normAngle\right) \cdot \left(0.3333333333333333 \cdot n0\_i - n1\_i \cdot -0.16666666666666666\right)\right) - n0\_i, n0\_i\right)
\end{array}
Initial program 97.4%
*-commutative97.4%
associate-*l*81.4%
*-commutative81.4%
associate-*l*75.1%
distribute-lft-out75.1%
Simplified75.1%
Taylor expanded in u around 0 89.7%
+-commutative89.7%
fma-define89.7%
+-commutative89.7%
mul-1-neg89.7%
unsub-neg89.7%
associate-/l*95.1%
*-commutative95.1%
associate-/l*99.6%
Simplified99.6%
Taylor expanded in normAngle around 0 99.7%
unpow299.7%
Applied egg-rr99.7%
Taylor expanded in n0_i around 0 99.7%
Final simplification99.7%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (fma u (- (+ n1_i (* (* normAngle normAngle) (* n1_i 0.16666666666666666))) n0_i) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, ((n1_i + ((normAngle * normAngle) * (n1_i * 0.16666666666666666f))) - n0_i), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, Float32(Float32(n1_i + Float32(Float32(normAngle * normAngle) * Float32(n1_i * Float32(0.16666666666666666)))) - n0_i), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, \left(n1\_i + \left(normAngle \cdot normAngle\right) \cdot \left(n1\_i \cdot 0.16666666666666666\right)\right) - n0\_i, n0\_i\right)
\end{array}
Initial program 97.4%
*-commutative97.4%
associate-*l*81.4%
*-commutative81.4%
associate-*l*75.1%
distribute-lft-out75.1%
Simplified75.1%
Taylor expanded in u around 0 89.7%
+-commutative89.7%
fma-define89.7%
+-commutative89.7%
mul-1-neg89.7%
unsub-neg89.7%
associate-/l*95.1%
*-commutative95.1%
associate-/l*99.6%
Simplified99.6%
Taylor expanded in normAngle around 0 99.7%
unpow299.7%
Applied egg-rr99.7%
Taylor expanded in n0_i around 0 99.5%
*-commutative99.5%
Simplified99.5%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (* u (* n1_i (- (/ normAngle (sin normAngle)) (/ n0_i n1_i))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + (u * (n1_i * ((normAngle / sinf(normAngle)) - (n0_i / 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 = n0_i + (u * (n1_i * ((normangle / sin(normangle)) - (n0_i / n1_i))))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(u * Float32(n1_i * Float32(Float32(normAngle / sin(normAngle)) - Float32(n0_i / n1_i))))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (u * (n1_i * ((normAngle / sin(normAngle)) - (n0_i / n1_i)))); end
\begin{array}{l}
\\
n0\_i + u \cdot \left(n1\_i \cdot \left(\frac{normAngle}{\sin normAngle} - \frac{n0\_i}{n1\_i}\right)\right)
\end{array}
Initial program 97.4%
*-commutative97.4%
associate-*l*81.4%
*-commutative81.4%
associate-*l*75.1%
distribute-lft-out75.1%
Simplified75.1%
Taylor expanded in u around 0 89.7%
Taylor expanded in normAngle around 0 92.8%
distribute-rgt-out--92.8%
metadata-eval92.8%
Simplified92.8%
Taylor expanded in normAngle around 0 92.6%
neg-mul-192.6%
Simplified92.6%
Taylor expanded in n1_i around inf 99.3%
+-commutative99.3%
mul-1-neg99.3%
unsub-neg99.3%
Simplified99.3%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (or (<= n0_i -4.99999991225835e-15) (not (<= n0_i 4.999999841327613e-21))) (- n0_i (* u n0_i)) (+ n0_i (* u n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n0_i <= -4.99999991225835e-15f) || !(n0_i <= 4.999999841327613e-21f)) {
tmp = n0_i - (u * n0_i);
} else {
tmp = n0_i + (u * n1_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 ((n0_i <= (-4.99999991225835e-15)) .or. (.not. (n0_i <= 4.999999841327613e-21))) then
tmp = n0_i - (u * n0_i)
else
tmp = n0_i + (u * n1_i)
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if ((n0_i <= Float32(-4.99999991225835e-15)) || !(n0_i <= Float32(4.999999841327613e-21))) tmp = Float32(n0_i - Float32(u * n0_i)); else tmp = Float32(n0_i + Float32(u * n1_i)); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if ((n0_i <= single(-4.99999991225835e-15)) || ~((n0_i <= single(4.999999841327613e-21)))) tmp = n0_i - (u * n0_i); else tmp = n0_i + (u * n1_i); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0\_i \leq -4.99999991225835 \cdot 10^{-15} \lor \neg \left(n0\_i \leq 4.999999841327613 \cdot 10^{-21}\right):\\
\;\;\;\;n0\_i - u \cdot n0\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i + u \cdot n1\_i\\
\end{array}
\end{array}
if n0_i < -4.99999991e-15 or 4.99999984e-21 < n0_i Initial program 98.5%
*-commutative98.5%
associate-*l*90.1%
*-commutative90.1%
associate-*l*89.9%
distribute-lft-out89.9%
Simplified89.9%
Taylor expanded in u around 0 96.9%
Taylor expanded in normAngle around 0 99.6%
distribute-rgt-out--99.6%
metadata-eval99.6%
Simplified99.6%
Taylor expanded in normAngle around 0 99.2%
neg-mul-199.2%
Simplified99.2%
Taylor expanded in n0_i around inf 88.6%
associate-*r*88.6%
mul-1-neg88.6%
Simplified88.6%
if -4.99999991e-15 < n0_i < 4.99999984e-21Initial program 96.5%
*-commutative96.5%
associate-*l*73.2%
*-commutative73.2%
associate-*l*61.5%
distribute-lft-out61.5%
Simplified61.5%
Taylor expanded in u around 0 83.0%
Taylor expanded in n0_i around 0 70.5%
Taylor expanded in normAngle around 0 88.2%
Final simplification88.4%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n0_i -5.0000000843119176e-17) n0_i (if (<= n0_i 7.000000383309403e-27) (* u n1_i) n0_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n0_i <= -5.0000000843119176e-17f) {
tmp = n0_i;
} else if (n0_i <= 7.000000383309403e-27f) {
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 (n0_i <= (-5.0000000843119176e-17)) then
tmp = n0_i
else if (n0_i <= 7.000000383309403e-27) 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 (n0_i <= Float32(-5.0000000843119176e-17)) tmp = n0_i; elseif (n0_i <= Float32(7.000000383309403e-27)) 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 (n0_i <= single(-5.0000000843119176e-17)) tmp = n0_i; elseif (n0_i <= single(7.000000383309403e-27)) tmp = u * n1_i; else tmp = n0_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0\_i \leq -5.0000000843119176 \cdot 10^{-17}:\\
\;\;\;\;n0\_i\\
\mathbf{elif}\;n0\_i \leq 7.000000383309403 \cdot 10^{-27}:\\
\;\;\;\;u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i\\
\end{array}
\end{array}
if n0_i < -5.00000008e-17 or 7.00000038e-27 < n0_i Initial program 97.9%
*-commutative97.9%
associate-*l*83.6%
*-commutative83.6%
associate-*l*82.0%
distribute-lft-out82.0%
Simplified82.0%
Taylor expanded in u around 0 64.8%
if -5.00000008e-17 < n0_i < 7.00000038e-27Initial program 96.8%
*-commutative96.8%
associate-*l*78.1%
*-commutative78.1%
associate-*l*65.0%
distribute-lft-out65.1%
Simplified65.1%
Taylor expanded in n0_i around 0 47.3%
associate-/l*60.6%
*-commutative60.6%
Simplified60.6%
clear-num60.6%
associate-/r/60.4%
*-commutative60.4%
Applied egg-rr60.4%
Taylor expanded in normAngle around 0 61.5%
Final simplification63.4%
(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.4%
*-commutative97.4%
associate-*l*81.4%
*-commutative81.4%
associate-*l*75.1%
distribute-lft-out75.1%
Simplified75.1%
Taylor expanded in u around 0 89.7%
Taylor expanded in normAngle around 0 98.8%
neg-mul-198.8%
sub-neg98.8%
Simplified98.8%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (* u n1_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + (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 = n0_i + (u * n1_i)
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(u * n1_i)) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (u * n1_i); end
\begin{array}{l}
\\
n0\_i + u \cdot n1\_i
\end{array}
Initial program 97.4%
*-commutative97.4%
associate-*l*81.4%
*-commutative81.4%
associate-*l*75.1%
distribute-lft-out75.1%
Simplified75.1%
Taylor expanded in u around 0 89.7%
Taylor expanded in n0_i around 0 72.2%
Taylor expanded in normAngle around 0 81.7%
Final simplification81.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.4%
*-commutative97.4%
associate-*l*81.4%
*-commutative81.4%
associate-*l*75.1%
distribute-lft-out75.1%
Simplified75.1%
Taylor expanded in u around 0 50.5%
herbie shell --seed 2024111
(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)))