
(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 (fma n0_i (/ (* (cos normAngle) (- normAngle)) (sin normAngle)) (* normAngle (/ n1_i (sin normAngle)))) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, fmaf(n0_i, ((cosf(normAngle) * -normAngle) / sinf(normAngle)), (normAngle * (n1_i / sinf(normAngle)))), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, fma(n0_i, Float32(Float32(cos(normAngle) * Float32(-normAngle)) / sin(normAngle)), Float32(normAngle * Float32(n1_i / sin(normAngle)))), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, \mathsf{fma}\left(n0\_i, \frac{\cos normAngle \cdot \left(-normAngle\right)}{\sin normAngle}, normAngle \cdot \frac{n1\_i}{\sin normAngle}\right), n0\_i\right)
\end{array}
Initial program 96.4%
Taylor expanded in u around 0
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites99.5%
Final simplification99.5%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(fma
u
(fma
(* normAngle normAngle)
(fma
(* normAngle normAngle)
(* n1_i 0.019444444444444445)
(fma n0_i 0.3333333333333333 (* n1_i 0.16666666666666666)))
(- n1_i n0_i))
n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, fmaf((normAngle * normAngle), fmaf((normAngle * normAngle), (n1_i * 0.019444444444444445f), fmaf(n0_i, 0.3333333333333333f, (n1_i * 0.16666666666666666f))), (n1_i - n0_i)), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, fma(Float32(normAngle * normAngle), fma(Float32(normAngle * normAngle), Float32(n1_i * Float32(0.019444444444444445)), fma(n0_i, Float32(0.3333333333333333), Float32(n1_i * Float32(0.16666666666666666)))), Float32(n1_i - n0_i)), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, \mathsf{fma}\left(normAngle \cdot normAngle, \mathsf{fma}\left(normAngle \cdot normAngle, n1\_i \cdot 0.019444444444444445, \mathsf{fma}\left(n0\_i, 0.3333333333333333, n1\_i \cdot 0.16666666666666666\right)\right), n1\_i - n0\_i\right), n0\_i\right)
\end{array}
Initial program 96.4%
Taylor expanded in u around 0
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites99.5%
Taylor expanded in normAngle around 0
Applied rewrites99.5%
Taylor expanded in n0_i around 0
lower-*.f3299.5
Applied rewrites99.5%
Final simplification99.5%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (fma u (fma (* normAngle (fma n0_i 0.3333333333333333 (* n1_i 0.16666666666666666))) normAngle (- n1_i n0_i)) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, fmaf((normAngle * fmaf(n0_i, 0.3333333333333333f, (n1_i * 0.16666666666666666f))), normAngle, (n1_i - n0_i)), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, fma(Float32(normAngle * fma(n0_i, Float32(0.3333333333333333), Float32(n1_i * Float32(0.16666666666666666)))), normAngle, Float32(n1_i - n0_i)), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, \mathsf{fma}\left(normAngle \cdot \mathsf{fma}\left(n0\_i, 0.3333333333333333, n1\_i \cdot 0.16666666666666666\right), normAngle, n1\_i - n0\_i\right), n0\_i\right)
\end{array}
Initial program 96.4%
Taylor expanded in u around 0
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites99.5%
Taylor expanded in normAngle around 0
+-commutativeN/A
+-commutativeN/A
associate-+l+N/A
*-commutativeN/A
unpow2N/A
associate-*r*N/A
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites99.4%
Final simplification99.4%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (fma u (fma n1_i (fma (* normAngle normAngle) 0.16666666666666666 1.0) (- n0_i)) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, fmaf(n1_i, fmaf((normAngle * normAngle), 0.16666666666666666f, 1.0f), -n0_i), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, fma(n1_i, fma(Float32(normAngle * normAngle), Float32(0.16666666666666666), Float32(1.0)), Float32(-n0_i)), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, \mathsf{fma}\left(n1\_i, \mathsf{fma}\left(normAngle \cdot normAngle, 0.16666666666666666, 1\right), -n0\_i\right), n0\_i\right)
\end{array}
Initial program 96.4%
Taylor expanded in normAngle around 0
+-commutativeN/A
lower-fma.f32N/A
unpow2N/A
lower-*.f32N/A
sub-negN/A
*-commutativeN/A
cube-multN/A
unpow2N/A
associate-*l*N/A
*-commutativeN/A
distribute-rgt-neg-inN/A
metadata-evalN/A
distribute-lft-outN/A
lower-*.f32N/A
lower-fma.f32N/A
unpow2N/A
lower-*.f3298.8
Applied rewrites98.8%
Taylor expanded in normAngle around 0
sub-negN/A
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lower-fma.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Taylor expanded in u around 0
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
unpow2N/A
lower-*.f32N/A
mul-1-negN/A
lower-neg.f3299.2
Applied rewrites99.2%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n0_i 9.9999998245167e-15) (fma n1_i u n0_i) (fma n0_i (- u) n0_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n0_i <= 9.9999998245167e-15f) {
tmp = fmaf(n1_i, u, n0_i);
} else {
tmp = fmaf(n0_i, -u, n0_i);
}
return tmp;
}
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n0_i <= Float32(9.9999998245167e-15)) tmp = fma(n1_i, u, n0_i); else tmp = fma(n0_i, Float32(-u), n0_i); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0\_i \leq 9.9999998245167 \cdot 10^{-15}:\\
\;\;\;\;\mathsf{fma}\left(n1\_i, u, n0\_i\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(n0\_i, -u, n0\_i\right)\\
\end{array}
\end{array}
if n0_i < 9.99999982e-15Initial program 95.8%
Taylor expanded in u around 0
Applied rewrites82.4%
Taylor expanded in normAngle around 0
+-commutativeN/A
lower-fma.f3284.9
Applied rewrites84.9%
if 9.99999982e-15 < n0_i Initial program 98.8%
Taylor expanded in normAngle around 0
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3299.1
Applied rewrites99.1%
Taylor expanded in n0_i around inf
sub-negN/A
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lower-fma.f32N/A
lower-neg.f3288.8
Applied rewrites88.8%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (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
\begin{array}{l}
\\
\mathsf{fma}\left(n1\_i - n0\_i, u, n0\_i\right)
\end{array}
Initial program 96.4%
Taylor expanded in u around 0
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites99.5%
Taylor expanded in normAngle around 0
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
mul-1-negN/A
unsub-negN/A
lower--.f3298.8
Applied rewrites98.8%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (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
\begin{array}{l}
\\
\mathsf{fma}\left(n1\_i, u, n0\_i\right)
\end{array}
Initial program 96.4%
Taylor expanded in u around 0
Applied rewrites80.3%
Taylor expanded in normAngle around 0
+-commutativeN/A
lower-fma.f3282.3
Applied rewrites82.3%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (* u n1_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return 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 = u * n1_i
end function
function code(normAngle, u, n0_i, n1_i) return Float32(u * n1_i) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = u * n1_i; end
\begin{array}{l}
\\
u \cdot n1\_i
\end{array}
Initial program 96.4%
Taylor expanded in normAngle around 0
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3298.4
Applied rewrites98.4%
Taylor expanded in n0_i around 0
lower-*.f3236.8
Applied rewrites36.8%
Final simplification36.8%
herbie shell --seed 2024214
(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)))