
(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 9 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 (+ (* 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 (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 = (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(Float32(n1_i * Float32(Float32(normAngle / sin(normAngle)) * u)) + Float32(n0_i * Float32(sin(Float32(normAngle * Float32(Float32(1.0) - u))) / sin(normAngle)))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = (n1_i * ((normAngle / sin(normAngle)) * u)) + (n0_i * (sin((normAngle * (single(1.0) - u))) / sin(normAngle))); end
\begin{array}{l}
\\
n1\_i \cdot \left(\frac{normAngle}{\sin normAngle} \cdot u\right) + n0\_i \cdot \frac{\sin \left(normAngle \cdot \left(1 - u\right)\right)}{\sin normAngle}
\end{array}
Initial program 96.8%
lift-*.f32N/A
lift-/.f32N/A
un-div-invN/A
lower-/.f3297.0
Applied rewrites97.0%
Taylor expanded in u around 0
associate-*l/N/A
lower-*.f32N/A
lower-/.f32N/A
lower-sin.f3299.0
Applied rewrites99.0%
Final simplification99.0%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ (* (- 1.0 (/ 1.0 (/ (tan normAngle) (* normAngle u)))) n0_i) (* n1_i (* (/ normAngle (sin normAngle)) u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return ((1.0f - (1.0f / (tanf(normAngle) / (normAngle * u)))) * n0_i) + (n1_i * ((normAngle / sinf(normAngle)) * u));
}
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 - (1.0e0 / (tan(normangle) / (normangle * u)))) * n0_i) + (n1_i * ((normangle / sin(normangle)) * u))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(Float32(Float32(Float32(1.0) - Float32(Float32(1.0) / Float32(tan(normAngle) / Float32(normAngle * u)))) * n0_i) + Float32(n1_i * Float32(Float32(normAngle / sin(normAngle)) * u))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = ((single(1.0) - (single(1.0) / (tan(normAngle) / (normAngle * u)))) * n0_i) + (n1_i * ((normAngle / sin(normAngle)) * u)); end
\begin{array}{l}
\\
\left(1 - \frac{1}{\frac{\tan normAngle}{normAngle \cdot u}}\right) \cdot n0\_i + n1\_i \cdot \left(\frac{normAngle}{\sin normAngle} \cdot u\right)
\end{array}
Initial program 96.8%
lift-*.f32N/A
lift-/.f32N/A
un-div-invN/A
lower-/.f3297.0
Applied rewrites97.0%
Taylor expanded in u around 0
associate-*l/N/A
lower-*.f32N/A
lower-/.f32N/A
lower-sin.f3299.0
Applied rewrites99.0%
Taylor expanded in u around 0
mul-1-negN/A
unsub-negN/A
lower--.f32N/A
lower-/.f32N/A
*-commutativeN/A
lower-*.f32N/A
*-commutativeN/A
lower-*.f32N/A
lower-cos.f32N/A
lower-sin.f3299.0
Applied rewrites99.0%
Applied rewrites99.0%
Final simplification99.0%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ (* (- 1.0 u) n0_i) (* n1_i (* (/ normAngle (sin normAngle)) u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return ((1.0f - u) * n0_i) + (n1_i * ((normAngle / sinf(normAngle)) * u));
}
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 - u) * n0_i) + (n1_i * ((normangle / sin(normangle)) * u))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(Float32(Float32(Float32(1.0) - u) * n0_i) + Float32(n1_i * Float32(Float32(normAngle / sin(normAngle)) * u))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = ((single(1.0) - u) * n0_i) + (n1_i * ((normAngle / sin(normAngle)) * u)); end
\begin{array}{l}
\\
\left(1 - u\right) \cdot n0\_i + n1\_i \cdot \left(\frac{normAngle}{\sin normAngle} \cdot u\right)
\end{array}
Initial program 96.8%
Taylor expanded in normAngle around 0
lower--.f3296.4
Applied rewrites96.4%
Taylor expanded in u around 0
associate-*l/N/A
lower-*.f32N/A
lower-/.f32N/A
lower-sin.f3298.7
Applied rewrites98.7%
Final simplification98.7%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n1_i -1.99999996490334e-14) (* n1_i u) (if (<= n1_i 2.4000000934092797e-15) (- n0_i (* n0_i u)) (* n1_i u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n1_i <= -1.99999996490334e-14f) {
tmp = n1_i * u;
} else if (n1_i <= 2.4000000934092797e-15f) {
tmp = n0_i - (n0_i * u);
} else {
tmp = n1_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 <= (-1.99999996490334e-14)) then
tmp = n1_i * u
else if (n1_i <= 2.4000000934092797e-15) then
tmp = n0_i - (n0_i * u)
else
tmp = n1_i * u
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n1_i <= Float32(-1.99999996490334e-14)) tmp = Float32(n1_i * u); elseif (n1_i <= Float32(2.4000000934092797e-15)) tmp = Float32(n0_i - Float32(n0_i * u)); else tmp = Float32(n1_i * u); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (n1_i <= single(-1.99999996490334e-14)) tmp = n1_i * u; elseif (n1_i <= single(2.4000000934092797e-15)) tmp = n0_i - (n0_i * u); else tmp = n1_i * u; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -1.99999996490334 \cdot 10^{-14}:\\
\;\;\;\;n1\_i \cdot u\\
\mathbf{elif}\;n1\_i \leq 2.4000000934092797 \cdot 10^{-15}:\\
\;\;\;\;n0\_i - n0\_i \cdot u\\
\mathbf{else}:\\
\;\;\;\;n1\_i \cdot u\\
\end{array}
\end{array}
if n1_i < -1.99999996e-14 or 2.4000001e-15 < n1_i Initial program 95.4%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3269.3
Applied rewrites68.4%
Taylor expanded in n0_i around 0
Applied rewrites69.3%
if -1.99999996e-14 < n1_i < 2.4000001e-15Initial program 97.6%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3220.9
Applied rewrites20.9%
Applied rewrites64.5%
Taylor expanded in n0_i around -inf
Applied rewrites77.0%
Applied rewrites77.3%
Final simplification74.4%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n1_i -1.99999996490334e-14) (* n1_i u) (if (<= n1_i 2.4000000934092797e-15) (* n0_i (- 1.0 u)) (* n1_i u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n1_i <= -1.99999996490334e-14f) {
tmp = n1_i * u;
} else if (n1_i <= 2.4000000934092797e-15f) {
tmp = n0_i * (1.0f - u);
} else {
tmp = n1_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 <= (-1.99999996490334e-14)) then
tmp = n1_i * u
else if (n1_i <= 2.4000000934092797e-15) then
tmp = n0_i * (1.0e0 - u)
else
tmp = n1_i * u
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n1_i <= Float32(-1.99999996490334e-14)) tmp = Float32(n1_i * u); elseif (n1_i <= Float32(2.4000000934092797e-15)) tmp = Float32(n0_i * Float32(Float32(1.0) - u)); else tmp = Float32(n1_i * u); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (n1_i <= single(-1.99999996490334e-14)) tmp = n1_i * u; elseif (n1_i <= single(2.4000000934092797e-15)) tmp = n0_i * (single(1.0) - u); else tmp = n1_i * u; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -1.99999996490334 \cdot 10^{-14}:\\
\;\;\;\;n1\_i \cdot u\\
\mathbf{elif}\;n1\_i \leq 2.4000000934092797 \cdot 10^{-15}:\\
\;\;\;\;n0\_i \cdot \left(1 - u\right)\\
\mathbf{else}:\\
\;\;\;\;n1\_i \cdot u\\
\end{array}
\end{array}
if n1_i < -1.99999996e-14 or 2.4000001e-15 < n1_i Initial program 95.4%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3269.3
Applied rewrites69.3%
Taylor expanded in n0_i around 0
Applied rewrites69.3%
if -1.99999996e-14 < n1_i < 2.4000001e-15Initial program 97.6%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3220.9
Applied rewrites20.9%
Taylor expanded in n0_i around inf
Applied rewrites77.0%
Final simplification74.2%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n1_i -9.99999983775159e-18) (* n1_i u) (if (<= n1_i 1.0000000168623835e-16) (* 1.0 n0_i) (* n1_i u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n1_i <= -9.99999983775159e-18f) {
tmp = n1_i * u;
} else if (n1_i <= 1.0000000168623835e-16f) {
tmp = 1.0f * n0_i;
} else {
tmp = n1_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 <= (-9.99999983775159e-18)) then
tmp = n1_i * u
else if (n1_i <= 1.0000000168623835e-16) then
tmp = 1.0e0 * n0_i
else
tmp = n1_i * u
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n1_i <= Float32(-9.99999983775159e-18)) tmp = Float32(n1_i * u); elseif (n1_i <= Float32(1.0000000168623835e-16)) tmp = Float32(Float32(1.0) * n0_i); else tmp = Float32(n1_i * u); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (n1_i <= single(-9.99999983775159e-18)) tmp = n1_i * u; elseif (n1_i <= single(1.0000000168623835e-16)) tmp = single(1.0) * n0_i; else tmp = n1_i * u; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -9.99999983775159 \cdot 10^{-18}:\\
\;\;\;\;n1\_i \cdot u\\
\mathbf{elif}\;n1\_i \leq 1.0000000168623835 \cdot 10^{-16}:\\
\;\;\;\;1 \cdot n0\_i\\
\mathbf{else}:\\
\;\;\;\;n1\_i \cdot u\\
\end{array}
\end{array}
if n1_i < -9.99999984e-18 or 1.00000002e-16 < n1_i Initial program 95.7%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3265.6
Applied rewrites64.9%
Taylor expanded in n0_i around 0
Applied rewrites65.6%
if -9.99999984e-18 < n1_i < 1.00000002e-16Initial program 97.6%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3217.1
Applied rewrites17.1%
Applied rewrites61.3%
Taylor expanded in n0_i around -inf
Applied rewrites80.1%
Taylor expanded in u around 0
Applied rewrites66.7%
Final simplification66.2%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ (- n0_i (* n0_i u)) (* n1_i u)))
float code(float normAngle, float u, float n0_i, float n1_i) {
return (n0_i - (n0_i * u)) + (n1_i * u);
}
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 - (n0_i * u)) + (n1_i * u)
end function
function code(normAngle, u, n0_i, n1_i) return Float32(Float32(n0_i - Float32(n0_i * u)) + Float32(n1_i * u)) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = (n0_i - (n0_i * u)) + (n1_i * u); end
\begin{array}{l}
\\
\left(n0\_i - n0\_i \cdot u\right) + n1\_i \cdot u
\end{array}
Initial program 96.8%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3238.3
Applied rewrites38.0%
Applied rewrites97.8%
Applied rewrites98.1%
Final simplification98.1%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ (* n0_i (- 1.0 u)) (* n1_i u)))
float code(float normAngle, float u, float n0_i, float n1_i) {
return (n0_i * (1.0f - u)) + (n1_i * u);
}
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 * (1.0e0 - u)) + (n1_i * u)
end function
function code(normAngle, u, n0_i, n1_i) return Float32(Float32(n0_i * Float32(Float32(1.0) - u)) + Float32(n1_i * u)) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = (n0_i * (single(1.0) - u)) + (n1_i * u); end
\begin{array}{l}
\\
n0\_i \cdot \left(1 - u\right) + n1\_i \cdot u
\end{array}
Initial program 96.8%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3238.3
Applied rewrites38.0%
Applied rewrites97.8%
Final simplification97.8%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (* n1_i u))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n1_i * u;
}
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 = n1_i * u
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n1_i * u) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n1_i * u; end
\begin{array}{l}
\\
n1\_i \cdot u
\end{array}
Initial program 96.8%
Taylor expanded in normAngle around 0
*-commutativeN/A
lower-fma.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f3238.3
Applied rewrites38.0%
Taylor expanded in n0_i around 0
Applied rewrites38.3%
Final simplification38.3%
herbie shell --seed 2024270
(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)))