
(FPCore (normAngle u n0_i n1_i)
: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)))
(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)
use fmin_fmax_functions
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}
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}
Herbie found 6 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (normAngle u n0_i n1_i)
: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)))
(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)
use fmin_fmax_functions
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}
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}
(FPCore (normAngle u n0_i n1_i)
: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)))
(fma
(-
n1_i
(fma
(fma -0.16666666666666666 (- n1_i n0_i) (* -0.5 n0_i))
(* normAngle normAngle)
n0_i))
u
n0_i))float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf((n1_i - fmaf(fmaf(-0.16666666666666666f, (n1_i - n0_i), (-0.5f * n0_i)), (normAngle * normAngle), n0_i)), u, n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(Float32(n1_i - fma(fma(Float32(-0.16666666666666666), Float32(n1_i - n0_i), Float32(Float32(-0.5) * n0_i)), Float32(normAngle * normAngle), n0_i)), u, n0_i) end
\mathsf{fma}\left(n1\_i - \mathsf{fma}\left(\mathsf{fma}\left(-0.16666666666666666, n1\_i - n0\_i, -0.5 \cdot n0\_i\right), normAngle \cdot normAngle, n0\_i\right), u, n0\_i\right)
Initial program 97.1%
Taylor expanded in normAngle around 0
Applied rewrites98.9%
Taylor expanded in u around 0
Applied rewrites98.9%
Applied rewrites99.1%
(FPCore (normAngle u n0_i n1_i)
: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)))
(fma
(-
n1_i
(fma (* -0.16666666666666666 n1_i) (* normAngle normAngle) n0_i))
u
n0_i))float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf((n1_i - fmaf((-0.16666666666666666f * n1_i), (normAngle * normAngle), n0_i)), u, n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(Float32(n1_i - fma(Float32(Float32(-0.16666666666666666) * n1_i), Float32(normAngle * normAngle), n0_i)), u, n0_i) end
\mathsf{fma}\left(n1\_i - \mathsf{fma}\left(-0.16666666666666666 \cdot n1\_i, normAngle \cdot normAngle, n0\_i\right), u, n0\_i\right)
Initial program 97.1%
Taylor expanded in normAngle around 0
Applied rewrites98.9%
Taylor expanded in u around 0
Applied rewrites98.9%
Applied rewrites99.1%
Taylor expanded in n0_i around 0
Applied rewrites98.9%
(FPCore (normAngle u n0_i n1_i)
: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)))
(fma
(-
n1_i
(fma (* -0.3333333333333333 n0_i) (* normAngle normAngle) n0_i))
u
n0_i))float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf((n1_i - fmaf((-0.3333333333333333f * n0_i), (normAngle * normAngle), n0_i)), u, n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(Float32(n1_i - fma(Float32(Float32(-0.3333333333333333) * n0_i), Float32(normAngle * normAngle), n0_i)), u, n0_i) end
\mathsf{fma}\left(n1\_i - \mathsf{fma}\left(-0.3333333333333333 \cdot n0\_i, normAngle \cdot normAngle, n0\_i\right), u, n0\_i\right)
Initial program 97.1%
Taylor expanded in normAngle around 0
Applied rewrites98.9%
Taylor expanded in u around 0
Applied rewrites98.9%
Applied rewrites99.1%
Taylor expanded in n0_i around inf
Applied rewrites98.4%
(FPCore (normAngle u n0_i n1_i)
: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)))
(fma (- n1_i n0_i) u n0_i))float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf((n1_i - n0_i), u, n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(Float32(n1_i - n0_i), u, n0_i) end
\mathsf{fma}\left(n1\_i - n0\_i, u, n0\_i\right)
Initial program 97.1%
Taylor expanded in u around 0
Applied rewrites88.1%
Taylor expanded in normAngle around 0
Applied rewrites98.1%
Applied rewrites98.3%
(FPCore (normAngle u n0_i n1_i)
: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)))
(if (<= n0_i 1.5203668808942347e-14)
(fma n1_i u n0_i)
(* n0_i (- 1.0 u))))float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n0_i <= 1.5203668808942347e-14f) {
tmp = fmaf(n1_i, u, n0_i);
} else {
tmp = n0_i * (1.0f - u);
}
return tmp;
}
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n0_i <= Float32(1.5203668808942347e-14)) tmp = fma(n1_i, u, n0_i); else tmp = Float32(n0_i * Float32(Float32(1.0) - u)); end return tmp end
\begin{array}{l}
\mathbf{if}\;n0\_i \leq 1.5203668808942347 \cdot 10^{-14}:\\
\;\;\;\;\mathsf{fma}\left(n1\_i, u, n0\_i\right)\\
\mathbf{else}:\\
\;\;\;\;n0\_i \cdot \left(1 - u\right)\\
\end{array}
if n0_i < 1.52036688e-14Initial program 97.1%
Taylor expanded in u around 0
Applied rewrites80.8%
Taylor expanded in normAngle around 0
Applied rewrites81.6%
Applied rewrites81.7%
if 1.52036688e-14 < n0_i Initial program 97.1%
Taylor expanded in normAngle around 0
Applied rewrites98.0%
Taylor expanded in n0_i around inf
Applied rewrites97.7%
Taylor expanded in u around inf
Applied rewrites36.6%
Taylor expanded in n0_i around inf
Applied rewrites58.7%
(FPCore (normAngle u n0_i n1_i)
: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)))
(fma n1_i u n0_i))float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(n1_i, u, n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(n1_i, u, n0_i) end
\mathsf{fma}\left(n1\_i, u, n0\_i\right)
Initial program 97.1%
Taylor expanded in u around 0
Applied rewrites80.8%
Taylor expanded in normAngle around 0
Applied rewrites81.6%
Applied rewrites81.7%
herbie shell --seed 2026086
(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)))