
(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 (/ (sin normAngle) normAngle)) (/ n0_i (/ (sin normAngle) (* normAngle (cos normAngle))))) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, ((n1_i / (sinf(normAngle) / normAngle)) - (n0_i / (sinf(normAngle) / (normAngle * cosf(normAngle))))), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, Float32(Float32(n1_i / Float32(sin(normAngle) / normAngle)) - Float32(n0_i / Float32(sin(normAngle) / Float32(normAngle * cos(normAngle))))), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, \frac{n1_i}{\frac{\sin normAngle}{normAngle}} - \frac{n0_i}{\frac{\sin normAngle}{normAngle \cdot \cos normAngle}}, n0_i\right)
\end{array}
Initial program 97.2%
*-commutative97.2%
associate-*l*85.6%
*-commutative85.6%
associate-*l*72.6%
distribute-lft-out72.7%
associate-*l/72.8%
*-lft-identity72.8%
fma-def72.8%
*-commutative72.8%
distribute-rgt-out--72.8%
*-lft-identity72.8%
Simplified72.8%
Taylor expanded in u around 0 87.5%
+-commutative87.5%
fma-def87.6%
+-commutative87.6%
mul-1-neg87.6%
unsub-neg87.6%
associate-/l*95.8%
associate-/l*99.6%
Simplified99.6%
Final simplification99.6%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (* u (- (/ normAngle (/ (sin normAngle) n1_i)) n0_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + (u * ((normAngle / (sinf(normAngle) / 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 * ((normangle / (sin(normangle) / n1_i)) - n0_i))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(u * Float32(Float32(normAngle / Float32(sin(normAngle) / n1_i)) - n0_i))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (u * ((normAngle / (sin(normAngle) / n1_i)) - n0_i)); end
\begin{array}{l}
\\
n0_i + u \cdot \left(\frac{normAngle}{\frac{\sin normAngle}{n1_i}} - n0_i\right)
\end{array}
Initial program 97.2%
Taylor expanded in normAngle around 0 97.3%
Taylor expanded in u around 0 97.7%
Taylor expanded in u around -inf 89.9%
mul-1-neg89.9%
unsub-neg89.9%
mul-1-neg89.9%
unsub-neg89.9%
*-commutative89.9%
associate-/l*99.2%
Simplified99.2%
Final simplification99.2%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(+
n0_i
(*
u
(-
(+ n1_i (* 0.16666666666666666 (* n1_i (* normAngle normAngle))))
n0_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + (u * ((n1_i + (0.16666666666666666f * (n1_i * (normAngle * normAngle)))) - 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 + (0.16666666666666666e0 * (n1_i * (normangle * normangle)))) - n0_i))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(u * Float32(Float32(n1_i + Float32(Float32(0.16666666666666666) * Float32(n1_i * Float32(normAngle * normAngle)))) - n0_i))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (u * ((n1_i + (single(0.16666666666666666) * (n1_i * (normAngle * normAngle)))) - n0_i)); end
\begin{array}{l}
\\
n0_i + u \cdot \left(\left(n1_i + 0.16666666666666666 \cdot \left(n1_i \cdot \left(normAngle \cdot normAngle\right)\right)\right) - n0_i\right)
\end{array}
Initial program 97.2%
Taylor expanded in normAngle around 0 97.3%
Taylor expanded in u around 0 97.7%
Taylor expanded in u around -inf 89.9%
mul-1-neg89.9%
unsub-neg89.9%
mul-1-neg89.9%
unsub-neg89.9%
*-commutative89.9%
associate-/l*99.2%
Simplified99.2%
Taylor expanded in normAngle around 0 98.9%
unpow298.9%
Simplified98.9%
Final simplification98.9%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n1_i -1.999999936531045e-20) (* u n1_i) (if (<= n1_i 4.999999980020986e-13) (* n0_i (- 1.0 u)) (* u n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n1_i <= -1.999999936531045e-20f) {
tmp = u * n1_i;
} else if (n1_i <= 4.999999980020986e-13f) {
tmp = n0_i * (1.0f - u);
} else {
tmp = 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 (n1_i <= (-1.999999936531045e-20)) then
tmp = u * n1_i
else if (n1_i <= 4.999999980020986e-13) then
tmp = n0_i * (1.0e0 - u)
else
tmp = u * n1_i
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n1_i <= Float32(-1.999999936531045e-20)) tmp = Float32(u * n1_i); elseif (n1_i <= Float32(4.999999980020986e-13)) tmp = Float32(n0_i * Float32(Float32(1.0) - u)); else tmp = Float32(u * n1_i); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (n1_i <= single(-1.999999936531045e-20)) tmp = u * n1_i; elseif (n1_i <= single(4.999999980020986e-13)) tmp = n0_i * (single(1.0) - u); else tmp = u * n1_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1_i \leq -1.999999936531045 \cdot 10^{-20}:\\
\;\;\;\;u \cdot n1_i\\
\mathbf{elif}\;n1_i \leq 4.999999980020986 \cdot 10^{-13}:\\
\;\;\;\;n0_i \cdot \left(1 - u\right)\\
\mathbf{else}:\\
\;\;\;\;u \cdot n1_i\\
\end{array}
\end{array}
if n1_i < -1.99999994e-20 or 4.99999998e-13 < n1_i Initial program 96.2%
*-commutative96.2%
associate-*l*81.1%
*-commutative81.1%
associate-*l*80.8%
distribute-lft-out80.9%
associate-*l/81.0%
*-lft-identity81.0%
fma-def81.0%
*-commutative81.0%
distribute-rgt-out--81.1%
*-lft-identity81.1%
Simplified81.1%
Taylor expanded in normAngle around 0 97.5%
Taylor expanded in n0_i around 0 69.7%
*-commutative69.7%
Simplified69.7%
if -1.99999994e-20 < n1_i < 4.99999998e-13Initial program 97.9%
*-commutative97.9%
associate-*l*88.6%
*-commutative88.6%
associate-*l*67.0%
distribute-lft-out67.0%
associate-*l/67.2%
*-lft-identity67.2%
fma-def67.2%
*-commutative67.2%
distribute-rgt-out--67.1%
*-lft-identity67.1%
Simplified67.1%
Taylor expanded in normAngle around 0 98.2%
Taylor expanded in n0_i around inf 79.8%
Final simplification75.7%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n1_i -1.999999936531045e-20) (* u n1_i) (if (<= n1_i 4.999999980020986e-13) (- n0_i (* u n0_i)) (* u n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n1_i <= -1.999999936531045e-20f) {
tmp = u * n1_i;
} else if (n1_i <= 4.999999980020986e-13f) {
tmp = n0_i - (u * n0_i);
} else {
tmp = 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 (n1_i <= (-1.999999936531045e-20)) then
tmp = u * n1_i
else if (n1_i <= 4.999999980020986e-13) then
tmp = n0_i - (u * n0_i)
else
tmp = u * n1_i
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n1_i <= Float32(-1.999999936531045e-20)) tmp = Float32(u * n1_i); elseif (n1_i <= Float32(4.999999980020986e-13)) tmp = Float32(n0_i - Float32(u * n0_i)); else tmp = Float32(u * n1_i); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (n1_i <= single(-1.999999936531045e-20)) tmp = u * n1_i; elseif (n1_i <= single(4.999999980020986e-13)) tmp = n0_i - (u * n0_i); else tmp = u * n1_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1_i \leq -1.999999936531045 \cdot 10^{-20}:\\
\;\;\;\;u \cdot n1_i\\
\mathbf{elif}\;n1_i \leq 4.999999980020986 \cdot 10^{-13}:\\
\;\;\;\;n0_i - u \cdot n0_i\\
\mathbf{else}:\\
\;\;\;\;u \cdot n1_i\\
\end{array}
\end{array}
if n1_i < -1.99999994e-20 or 4.99999998e-13 < n1_i Initial program 96.2%
*-commutative96.2%
associate-*l*81.1%
*-commutative81.1%
associate-*l*80.8%
distribute-lft-out80.9%
associate-*l/81.0%
*-lft-identity81.0%
fma-def81.0%
*-commutative81.0%
distribute-rgt-out--81.1%
*-lft-identity81.1%
Simplified81.1%
Taylor expanded in normAngle around 0 97.5%
Taylor expanded in n0_i around 0 69.7%
*-commutative69.7%
Simplified69.7%
if -1.99999994e-20 < n1_i < 4.99999998e-13Initial program 97.9%
*-commutative97.9%
associate-*l*88.6%
*-commutative88.6%
associate-*l*67.0%
distribute-lft-out67.0%
associate-*l/67.2%
*-lft-identity67.2%
fma-def67.2%
*-commutative67.2%
distribute-rgt-out--67.1%
*-lft-identity67.1%
Simplified67.1%
Taylor expanded in u around 0 86.3%
+-commutative86.3%
fma-def86.3%
+-commutative86.3%
mul-1-neg86.3%
unsub-neg86.3%
associate-/l*93.2%
associate-/l*99.4%
Simplified99.4%
Taylor expanded in normAngle around 0 98.6%
+-commutative98.6%
fma-def98.7%
Simplified98.7%
Taylor expanded in n1_i around 0 80.0%
mul-1-neg80.0%
unsub-neg80.0%
Simplified80.0%
Final simplification75.8%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n1_i -3.99999987306209e-21) (* u n1_i) (if (<= n1_i 1.999999936531045e-19) n0_i (* u n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n1_i <= -3.99999987306209e-21f) {
tmp = u * n1_i;
} else if (n1_i <= 1.999999936531045e-19f) {
tmp = n0_i;
} else {
tmp = 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 (n1_i <= (-3.99999987306209e-21)) then
tmp = u * n1_i
else if (n1_i <= 1.999999936531045e-19) then
tmp = n0_i
else
tmp = u * n1_i
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n1_i <= Float32(-3.99999987306209e-21)) tmp = Float32(u * n1_i); elseif (n1_i <= Float32(1.999999936531045e-19)) tmp = n0_i; else tmp = Float32(u * n1_i); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (n1_i <= single(-3.99999987306209e-21)) tmp = u * n1_i; elseif (n1_i <= single(1.999999936531045e-19)) tmp = n0_i; else tmp = u * n1_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1_i \leq -3.99999987306209 \cdot 10^{-21}:\\
\;\;\;\;u \cdot n1_i\\
\mathbf{elif}\;n1_i \leq 1.999999936531045 \cdot 10^{-19}:\\
\;\;\;\;n0_i\\
\mathbf{else}:\\
\;\;\;\;u \cdot n1_i\\
\end{array}
\end{array}
if n1_i < -3.9999999e-21 or 1.99999994e-19 < n1_i Initial program 95.8%
*-commutative95.8%
associate-*l*81.7%
*-commutative81.7%
associate-*l*80.4%
distribute-lft-out80.4%
associate-*l/80.4%
*-lft-identity80.4%
fma-def80.5%
*-commutative80.5%
distribute-rgt-out--80.5%
*-lft-identity80.5%
Simplified80.5%
Taylor expanded in normAngle around 0 97.7%
Taylor expanded in n0_i around 0 67.1%
*-commutative67.1%
Simplified67.1%
if -3.9999999e-21 < n1_i < 1.99999994e-19Initial program 98.4%
*-commutative98.4%
associate-*l*89.0%
*-commutative89.0%
associate-*l*65.9%
distribute-lft-out65.9%
associate-*l/66.1%
*-lft-identity66.1%
fma-def66.1%
*-commutative66.1%
distribute-rgt-out--66.1%
*-lft-identity66.1%
Simplified66.1%
Taylor expanded in u around 0 86.2%
+-commutative86.2%
fma-def86.2%
+-commutative86.2%
mul-1-neg86.2%
unsub-neg86.2%
associate-/l*92.6%
associate-/l*99.4%
Simplified99.4%
Taylor expanded in normAngle around 0 98.5%
+-commutative98.5%
fma-def98.6%
Simplified98.6%
Taylor expanded in u around 0 65.7%
Final simplification66.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.2%
*-commutative97.2%
associate-*l*85.6%
*-commutative85.6%
associate-*l*72.6%
distribute-lft-out72.7%
associate-*l/72.8%
*-lft-identity72.8%
fma-def72.8%
*-commutative72.8%
distribute-rgt-out--72.8%
*-lft-identity72.8%
Simplified72.8%
Taylor expanded in normAngle around 0 97.9%
Taylor expanded in u around -inf 98.2%
mul-1-neg98.2%
unsub-neg98.2%
mul-1-neg98.2%
unsub-neg98.2%
Simplified98.2%
Final simplification98.2%
(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.2%
*-commutative97.2%
associate-*l*85.6%
*-commutative85.6%
associate-*l*72.6%
distribute-lft-out72.7%
associate-*l/72.8%
*-lft-identity72.8%
fma-def72.8%
*-commutative72.8%
distribute-rgt-out--72.8%
*-lft-identity72.8%
Simplified72.8%
Taylor expanded in u around 0 87.5%
+-commutative87.5%
fma-def87.6%
+-commutative87.6%
mul-1-neg87.6%
unsub-neg87.6%
associate-/l*95.8%
associate-/l*99.6%
Simplified99.6%
Taylor expanded in normAngle around 0 98.2%
+-commutative98.2%
fma-def98.4%
Simplified98.4%
Taylor expanded in u around 0 47.0%
Final simplification47.0%
herbie shell --seed 2023283
(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)))