
(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 3 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
(let* ((t_0 (/ 1.0 (sin normAngle))))
(+
(* (* (sin (* (- 1.0 u) normAngle)) t_0) n0_i)
(* (* t_0 (sin (* u normAngle))) 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) + ((t_0 * sinf((u * normAngle))) * 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) + ((t_0 * sin((u * normangle))) * 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(t_0 * sin(Float32(u * normAngle))) * 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) + ((t_0 * sin((u * normAngle))) * 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(t\_0 \cdot \sin \left(u \cdot normAngle\right)\right) \cdot n1\_i
\end{array}
\end{array}
Initial program 96.9%
Final simplification96.9%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (/ (fma (sin (* (- 1.0 u) normAngle)) n0_i (* (sin (* u normAngle)) n1_i)) (sin normAngle)))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(sinf(((1.0f - u) * normAngle)), n0_i, (sinf((u * normAngle)) * n1_i)) / sinf(normAngle);
}
function code(normAngle, u, n0_i, n1_i) return Float32(fma(sin(Float32(Float32(Float32(1.0) - u) * normAngle)), n0_i, Float32(sin(Float32(u * normAngle)) * n1_i)) / sin(normAngle)) end
\begin{array}{l}
\\
\frac{\mathsf{fma}\left(\sin \left(\left(1 - u\right) \cdot normAngle\right), n0\_i, \sin \left(u \cdot normAngle\right) \cdot n1\_i\right)}{\sin normAngle}
\end{array}
Initial program 96.9%
*-commutative96.9%
associate-*l*79.2%
*-commutative79.2%
associate-*l*73.4%
distribute-lft-out73.5%
associate-*l/73.7%
+-commutative73.7%
*-lft-identity73.7%
+-commutative73.7%
fma-def73.7%
Simplified73.7%
Final simplification73.7%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (* (/ 1.0 (sin normAngle)) (+ (* (sin (* u normAngle)) n1_i) (* (sin (* (- 1.0 u) normAngle)) n0_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return (1.0f / sinf(normAngle)) * ((sinf((u * normAngle)) * n1_i) + (sinf(((1.0f - u) * 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 = (1.0e0 / sin(normangle)) * ((sin((u * normangle)) * n1_i) + (sin(((1.0e0 - u) * normangle)) * n0_i))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(Float32(Float32(1.0) / sin(normAngle)) * Float32(Float32(sin(Float32(u * normAngle)) * n1_i) + Float32(sin(Float32(Float32(Float32(1.0) - u) * normAngle)) * n0_i))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = (single(1.0) / sin(normAngle)) * ((sin((u * normAngle)) * n1_i) + (sin(((single(1.0) - u) * normAngle)) * n0_i)); end
\begin{array}{l}
\\
\frac{1}{\sin normAngle} \cdot \left(\sin \left(u \cdot normAngle\right) \cdot n1\_i + \sin \left(\left(1 - u\right) \cdot normAngle\right) \cdot n0\_i\right)
\end{array}
Initial program 96.9%
*-commutative96.9%
associate-*l*79.2%
*-commutative79.2%
associate-*l*73.4%
distribute-lft-out73.5%
Simplified73.5%
Final simplification73.5%
herbie shell --seed 2024039
(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)))