
(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 (* n0_i (+ (* n1_i (* (/ normAngle (sin normAngle)) (/ u n0_i))) (/ (sin (* normAngle (- 1.0 u))) (sin normAngle)))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i * ((n1_i * ((normAngle / sinf(normAngle)) * (u / n0_i))) + (sinf((normAngle * (1.0f - u))) / sinf(normAngle)));
}
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 * ((n1_i * ((normangle / sin(normangle)) * (u / n0_i))) + (sin((normangle * (1.0e0 - u))) / sin(normangle)))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i * Float32(Float32(n1_i * Float32(Float32(normAngle / sin(normAngle)) * Float32(u / n0_i))) + Float32(sin(Float32(normAngle * Float32(Float32(1.0) - u))) / sin(normAngle)))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i * ((n1_i * ((normAngle / sin(normAngle)) * (u / n0_i))) + (sin((normAngle * (single(1.0) - u))) / sin(normAngle))); end
\begin{array}{l}
\\
n0\_i \cdot \left(n1\_i \cdot \left(\frac{normAngle}{\sin normAngle} \cdot \frac{u}{n0\_i}\right) + \frac{\sin \left(normAngle \cdot \left(1 - u\right)\right)}{\sin normAngle}\right)
\end{array}
Initial program 96.8%
*-commutative96.8%
associate-*l*82.6%
*-commutative82.6%
associate-*l*76.5%
distribute-lft-out76.6%
Simplified76.6%
Taylor expanded in u around 0 76.0%
*-commutative76.0%
Simplified76.0%
Taylor expanded in n0_i around inf 64.9%
+-commutative64.9%
associate-/l*65.8%
*-commutative65.8%
times-frac98.3%
Simplified98.3%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (* u (- (* n1_i (/ normAngle (sin normAngle))) n0_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + (u * ((n1_i * (normAngle / sinf(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 * (normangle / sin(normangle))) - n0_i))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(u * Float32(Float32(n1_i * Float32(normAngle / sin(normAngle))) - n0_i))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (u * ((n1_i * (normAngle / sin(normAngle))) - n0_i)); end
\begin{array}{l}
\\
n0\_i + u \cdot \left(n1\_i \cdot \frac{normAngle}{\sin normAngle} - n0\_i\right)
\end{array}
Initial program 96.8%
Taylor expanded in normAngle around 0 95.8%
div-inv96.4%
associate-*l/87.1%
Applied egg-rr87.1%
Taylor expanded in u around 0 92.3%
neg-mul-192.3%
+-commutative92.3%
unsub-neg92.3%
associate-/l*97.9%
Simplified97.9%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(if (or (<= n1_i -4.999999999099794e-24)
(not (<= n1_i 2.0000000390829628e-25)))
(+ n0_i (* n1_i u))
(- n0_i (* n0_i u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n1_i <= -4.999999999099794e-24f) || !(n1_i <= 2.0000000390829628e-25f)) {
tmp = n0_i + (n1_i * u);
} else {
tmp = n0_i - (n0_i * 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 <= (-4.999999999099794e-24)) .or. (.not. (n1_i <= 2.0000000390829628e-25))) then
tmp = n0_i + (n1_i * u)
else
tmp = n0_i - (n0_i * u)
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if ((n1_i <= Float32(-4.999999999099794e-24)) || !(n1_i <= Float32(2.0000000390829628e-25))) tmp = Float32(n0_i + Float32(n1_i * u)); else tmp = Float32(n0_i - Float32(n0_i * u)); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if ((n1_i <= single(-4.999999999099794e-24)) || ~((n1_i <= single(2.0000000390829628e-25)))) tmp = n0_i + (n1_i * u); else tmp = n0_i - (n0_i * u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -4.999999999099794 \cdot 10^{-24} \lor \neg \left(n1\_i \leq 2.0000000390829628 \cdot 10^{-25}\right):\\
\;\;\;\;n0\_i + n1\_i \cdot u\\
\mathbf{else}:\\
\;\;\;\;n0\_i - n0\_i \cdot u\\
\end{array}
\end{array}
if n1_i < -5e-24 or 2.00000004e-25 < n1_i Initial program 96.3%
Taylor expanded in u around 0 89.8%
+-commutative89.8%
mul-1-neg89.8%
unsub-neg89.8%
associate-/l*97.3%
associate-*r*97.3%
Simplified97.3%
Taylor expanded in n1_i around inf 80.2%
Taylor expanded in normAngle around 0 85.8%
if -5e-24 < n1_i < 2.00000004e-25Initial program 97.4%
Taylor expanded in n0_i around inf 66.3%
associate-/l*91.7%
Simplified91.7%
Taylor expanded in normAngle around 0 90.3%
Taylor expanded in u around 0 90.7%
associate-*r*90.7%
neg-mul-190.7%
Simplified90.7%
Final simplification87.8%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(if (or (<= n1_i -4.999999999099794e-24)
(not (<= n1_i 2.0000000390829628e-25)))
(+ n0_i (* n1_i u))
(* n0_i (- 1.0 u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n1_i <= -4.999999999099794e-24f) || !(n1_i <= 2.0000000390829628e-25f)) {
tmp = n0_i + (n1_i * u);
} 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 <= (-4.999999999099794e-24)) .or. (.not. (n1_i <= 2.0000000390829628e-25))) then
tmp = n0_i + (n1_i * u)
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(-4.999999999099794e-24)) || !(n1_i <= Float32(2.0000000390829628e-25))) tmp = Float32(n0_i + Float32(n1_i * u)); 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(-4.999999999099794e-24)) || ~((n1_i <= single(2.0000000390829628e-25)))) tmp = n0_i + (n1_i * u); else tmp = n0_i * (single(1.0) - u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -4.999999999099794 \cdot 10^{-24} \lor \neg \left(n1\_i \leq 2.0000000390829628 \cdot 10^{-25}\right):\\
\;\;\;\;n0\_i + n1\_i \cdot u\\
\mathbf{else}:\\
\;\;\;\;n0\_i \cdot \left(1 - u\right)\\
\end{array}
\end{array}
if n1_i < -5e-24 or 2.00000004e-25 < n1_i Initial program 96.3%
Taylor expanded in u around 0 89.8%
+-commutative89.8%
mul-1-neg89.8%
unsub-neg89.8%
associate-/l*97.3%
associate-*r*97.3%
Simplified97.3%
Taylor expanded in n1_i around inf 80.2%
Taylor expanded in normAngle around 0 85.8%
if -5e-24 < n1_i < 2.00000004e-25Initial program 97.4%
Taylor expanded in n0_i around inf 66.3%
associate-/l*91.7%
Simplified91.7%
Taylor expanded in normAngle around 0 90.3%
Final simplification87.6%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (or (<= n1_i -1.999999936531045e-21) (not (<= n1_i 4.00000018325482e-18))) (* n1_i u) (* n0_i (- 1.0 u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n1_i <= -1.999999936531045e-21f) || !(n1_i <= 4.00000018325482e-18f)) {
tmp = n1_i * u;
} 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 <= (-1.999999936531045e-21)) .or. (.not. (n1_i <= 4.00000018325482e-18))) then
tmp = n1_i * u
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(-1.999999936531045e-21)) || !(n1_i <= Float32(4.00000018325482e-18))) tmp = Float32(n1_i * u); 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(-1.999999936531045e-21)) || ~((n1_i <= single(4.00000018325482e-18)))) tmp = n1_i * u; else tmp = n0_i * (single(1.0) - u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -1.999999936531045 \cdot 10^{-21} \lor \neg \left(n1\_i \leq 4.00000018325482 \cdot 10^{-18}\right):\\
\;\;\;\;n1\_i \cdot u\\
\mathbf{else}:\\
\;\;\;\;n0\_i \cdot \left(1 - u\right)\\
\end{array}
\end{array}
if n1_i < -1.9999999e-21 or 4.00000018e-18 < n1_i Initial program 95.9%
*-commutative95.9%
associate-*l*92.5%
*-commutative92.5%
associate-*l*81.9%
distribute-lft-out81.9%
Simplified81.9%
Taylor expanded in u around 0 81.0%
*-commutative81.0%
Simplified81.0%
Taylor expanded in n0_i around inf 58.9%
+-commutative58.9%
associate-/l*59.5%
*-commutative59.5%
times-frac97.9%
Simplified97.9%
Taylor expanded in normAngle around 0 95.6%
Taylor expanded in n0_i around 0 62.3%
*-commutative62.3%
Simplified62.3%
if -1.9999999e-21 < n1_i < 4.00000018e-18Initial program 97.6%
Taylor expanded in n0_i around inf 63.0%
associate-/l*85.2%
Simplified85.2%
Taylor expanded in normAngle around 0 84.0%
Final simplification73.0%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(if (or (<= n1_i -1.1999999840067324e-23)
(not (<= n1_i 9.999999682655225e-22)))
(* n1_i u)
n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n1_i <= -1.1999999840067324e-23f) || !(n1_i <= 9.999999682655225e-22f)) {
tmp = n1_i * u;
} 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 <= (-1.1999999840067324e-23)) .or. (.not. (n1_i <= 9.999999682655225e-22))) then
tmp = n1_i * u
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(-1.1999999840067324e-23)) || !(n1_i <= Float32(9.999999682655225e-22))) tmp = Float32(n1_i * u); 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(-1.1999999840067324e-23)) || ~((n1_i <= single(9.999999682655225e-22)))) tmp = n1_i * u; else tmp = n0_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -1.1999999840067324 \cdot 10^{-23} \lor \neg \left(n1\_i \leq 9.999999682655225 \cdot 10^{-22}\right):\\
\;\;\;\;n1\_i \cdot u\\
\mathbf{else}:\\
\;\;\;\;n0\_i\\
\end{array}
\end{array}
if n1_i < -1.19999998e-23 or 9.9999997e-22 < n1_i Initial program 96.1%
*-commutative96.1%
associate-*l*92.0%
*-commutative92.0%
associate-*l*81.9%
distribute-lft-out82.0%
Simplified82.0%
Taylor expanded in u around 0 81.1%
*-commutative81.1%
Simplified81.1%
Taylor expanded in n0_i around inf 59.1%
+-commutative59.1%
associate-/l*59.8%
*-commutative59.8%
times-frac97.9%
Simplified97.9%
Taylor expanded in normAngle around 0 95.5%
Taylor expanded in n0_i around 0 61.1%
*-commutative61.1%
Simplified61.1%
if -1.19999998e-23 < n1_i < 9.9999997e-22Initial program 97.5%
Taylor expanded in u around 0 65.5%
Final simplification63.1%
(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 96.8%
Taylor expanded in u around 0 89.3%
+-commutative89.3%
mul-1-neg89.3%
unsub-neg89.3%
associate-/l*94.1%
associate-*r*94.1%
Simplified94.1%
Taylor expanded in normAngle around 0 96.3%
(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 96.8%
Taylor expanded in u around 0 44.6%
herbie shell --seed 2024166
(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)))