
(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
(let* ((t_0 (- (* n0_i -0.16666666666666666) (* n0_i -0.5))))
(+
n0_i
(+
(* u (- n1_i n0_i))
(-
(* (pow normAngle 2.0) (* u (- t_0 (* n1_i -0.16666666666666666))))
(*
(pow normAngle 4.0)
(*
u
(+
(+
(* n0_i 0.041666666666666664)
(- (* -0.16666666666666666 t_0) (* n0_i 0.008333333333333333)))
(+
(* n1_i -0.027777777777777776)
(* n1_i 0.008333333333333333))))))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float t_0 = (n0_i * -0.16666666666666666f) - (n0_i * -0.5f);
return n0_i + ((u * (n1_i - n0_i)) + ((powf(normAngle, 2.0f) * (u * (t_0 - (n1_i * -0.16666666666666666f)))) - (powf(normAngle, 4.0f) * (u * (((n0_i * 0.041666666666666664f) + ((-0.16666666666666666f * t_0) - (n0_i * 0.008333333333333333f))) + ((n1_i * -0.027777777777777776f) + (n1_i * 0.008333333333333333f)))))));
}
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 = (n0_i * (-0.16666666666666666e0)) - (n0_i * (-0.5e0))
code = n0_i + ((u * (n1_i - n0_i)) + (((normangle ** 2.0e0) * (u * (t_0 - (n1_i * (-0.16666666666666666e0))))) - ((normangle ** 4.0e0) * (u * (((n0_i * 0.041666666666666664e0) + (((-0.16666666666666666e0) * t_0) - (n0_i * 0.008333333333333333e0))) + ((n1_i * (-0.027777777777777776e0)) + (n1_i * 0.008333333333333333e0)))))))
end function
function code(normAngle, u, n0_i, n1_i) t_0 = Float32(Float32(n0_i * Float32(-0.16666666666666666)) - Float32(n0_i * Float32(-0.5))) return Float32(n0_i + Float32(Float32(u * Float32(n1_i - n0_i)) + Float32(Float32((normAngle ^ Float32(2.0)) * Float32(u * Float32(t_0 - Float32(n1_i * Float32(-0.16666666666666666))))) - Float32((normAngle ^ Float32(4.0)) * Float32(u * Float32(Float32(Float32(n0_i * Float32(0.041666666666666664)) + Float32(Float32(Float32(-0.16666666666666666) * t_0) - Float32(n0_i * Float32(0.008333333333333333)))) + Float32(Float32(n1_i * Float32(-0.027777777777777776)) + Float32(n1_i * Float32(0.008333333333333333))))))))) end
function tmp = code(normAngle, u, n0_i, n1_i) t_0 = (n0_i * single(-0.16666666666666666)) - (n0_i * single(-0.5)); tmp = n0_i + ((u * (n1_i - n0_i)) + (((normAngle ^ single(2.0)) * (u * (t_0 - (n1_i * single(-0.16666666666666666))))) - ((normAngle ^ single(4.0)) * (u * (((n0_i * single(0.041666666666666664)) + ((single(-0.16666666666666666) * t_0) - (n0_i * single(0.008333333333333333)))) + ((n1_i * single(-0.027777777777777776)) + (n1_i * single(0.008333333333333333)))))))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := n0\_i \cdot -0.16666666666666666 - n0\_i \cdot -0.5\\
n0\_i + \left(u \cdot \left(n1\_i - n0\_i\right) + \left({normAngle}^{2} \cdot \left(u \cdot \left(t\_0 - n1\_i \cdot -0.16666666666666666\right)\right) - {normAngle}^{4} \cdot \left(u \cdot \left(\left(n0\_i \cdot 0.041666666666666664 + \left(-0.16666666666666666 \cdot t\_0 - n0\_i \cdot 0.008333333333333333\right)\right) + \left(n1\_i \cdot -0.027777777777777776 + n1\_i \cdot 0.008333333333333333\right)\right)\right)\right)\right)
\end{array}
\end{array}
Initial program 97.6%
*-commutative97.6%
associate-*l*82.7%
*-commutative82.7%
associate-*l*76.3%
distribute-lft-out76.3%
Simplified76.3%
Taylor expanded in u around 0 87.0%
Taylor expanded in normAngle around 0 99.3%
Final simplification99.3%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(+
n0_i
(+
(* u (- n1_i n0_i))
(*
(pow normAngle 2.0)
(* u (+ (* n0_i 0.3333333333333333) (* n1_i 0.16666666666666666)))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((u * (n1_i - n0_i)) + (powf(normAngle, 2.0f) * (u * ((n0_i * 0.3333333333333333f) + (n1_i * 0.16666666666666666f)))));
}
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)) + ((normangle ** 2.0e0) * (u * ((n0_i * 0.3333333333333333e0) + (n1_i * 0.16666666666666666e0)))))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32(u * Float32(n1_i - n0_i)) + Float32((normAngle ^ Float32(2.0)) * Float32(u * Float32(Float32(n0_i * Float32(0.3333333333333333)) + Float32(n1_i * Float32(0.16666666666666666))))))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((u * (n1_i - n0_i)) + ((normAngle ^ single(2.0)) * (u * ((n0_i * single(0.3333333333333333)) + (n1_i * single(0.16666666666666666)))))); end
\begin{array}{l}
\\
n0\_i + \left(u \cdot \left(n1\_i - n0\_i\right) + {normAngle}^{2} \cdot \left(u \cdot \left(n0\_i \cdot 0.3333333333333333 + n1\_i \cdot 0.16666666666666666\right)\right)\right)
\end{array}
Initial program 97.6%
*-commutative97.6%
associate-*l*82.7%
*-commutative82.7%
associate-*l*76.3%
distribute-lft-out76.3%
Simplified76.3%
Taylor expanded in u around 0 87.0%
Taylor expanded in normAngle around 0 99.1%
Taylor expanded in n0_i around 0 99.1%
+-commutative99.1%
*-commutative99.1%
*-commutative99.1%
associate-*r*99.1%
associate-*r*99.1%
*-commutative99.1%
distribute-rgt-out99.1%
*-commutative99.1%
Simplified99.1%
Final simplification99.1%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (+ (* u (- n1_i n0_i)) (* (pow normAngle 2.0) (* n0_i (* u 0.3333333333333333))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((u * (n1_i - n0_i)) + (powf(normAngle, 2.0f) * (n0_i * (u * 0.3333333333333333f))));
}
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)) + ((normangle ** 2.0e0) * (n0_i * (u * 0.3333333333333333e0))))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32(u * Float32(n1_i - n0_i)) + Float32((normAngle ^ Float32(2.0)) * Float32(n0_i * Float32(u * Float32(0.3333333333333333)))))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((u * (n1_i - n0_i)) + ((normAngle ^ single(2.0)) * (n0_i * (u * single(0.3333333333333333))))); end
\begin{array}{l}
\\
n0\_i + \left(u \cdot \left(n1\_i - n0\_i\right) + {normAngle}^{2} \cdot \left(n0\_i \cdot \left(u \cdot 0.3333333333333333\right)\right)\right)
\end{array}
Initial program 97.6%
*-commutative97.6%
associate-*l*82.7%
*-commutative82.7%
associate-*l*76.3%
distribute-lft-out76.3%
Simplified76.3%
Taylor expanded in u around 0 87.0%
Taylor expanded in normAngle around 0 99.1%
Taylor expanded in n0_i around inf 98.3%
*-commutative98.3%
associate-*l*98.3%
Simplified98.3%
Final simplification98.3%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (+ (* u (- n1_i n0_i)) (* (pow normAngle 2.0) (* n1_i (* u 0.16666666666666666))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((u * (n1_i - n0_i)) + (powf(normAngle, 2.0f) * (n1_i * (u * 0.16666666666666666f))));
}
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)) + ((normangle ** 2.0e0) * (n1_i * (u * 0.16666666666666666e0))))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32(u * Float32(n1_i - n0_i)) + Float32((normAngle ^ Float32(2.0)) * Float32(n1_i * Float32(u * Float32(0.16666666666666666)))))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((u * (n1_i - n0_i)) + ((normAngle ^ single(2.0)) * (n1_i * (u * single(0.16666666666666666))))); end
\begin{array}{l}
\\
n0\_i + \left(u \cdot \left(n1\_i - n0\_i\right) + {normAngle}^{2} \cdot \left(n1\_i \cdot \left(u \cdot 0.16666666666666666\right)\right)\right)
\end{array}
Initial program 97.6%
*-commutative97.6%
associate-*l*82.7%
*-commutative82.7%
associate-*l*76.3%
distribute-lft-out76.3%
Simplified76.3%
Taylor expanded in u around 0 87.0%
Taylor expanded in normAngle around 0 99.1%
Taylor expanded in n0_i around 0 98.9%
associate-*r*98.9%
*-commutative98.9%
associate-*l*98.9%
Simplified98.9%
Final simplification98.9%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(if (or (<= n0_i -5.000000229068525e-19)
(not (<= n0_i 4.0000000126843074e-28)))
(* n0_i (- 1.0 u))
(* u n1_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n0_i <= -5.000000229068525e-19f) || !(n0_i <= 4.0000000126843074e-28f)) {
tmp = n0_i * (1.0f - u);
} else {
tmp = u * n1_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 ((n0_i <= (-5.000000229068525e-19)) .or. (.not. (n0_i <= 4.0000000126843074e-28))) then
tmp = n0_i * (1.0e0 - u)
else
tmp = u * n1_i
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if ((n0_i <= Float32(-5.000000229068525e-19)) || !(n0_i <= Float32(4.0000000126843074e-28))) tmp = Float32(n0_i * Float32(Float32(1.0) - u)); else tmp = Float32(u * n1_i); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if ((n0_i <= single(-5.000000229068525e-19)) || ~((n0_i <= single(4.0000000126843074e-28)))) tmp = n0_i * (single(1.0) - u); else tmp = u * n1_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0\_i \leq -5.000000229068525 \cdot 10^{-19} \lor \neg \left(n0\_i \leq 4.0000000126843074 \cdot 10^{-28}\right):\\
\;\;\;\;n0\_i \cdot \left(1 - u\right)\\
\mathbf{else}:\\
\;\;\;\;u \cdot n1\_i\\
\end{array}
\end{array}
if n0_i < -5.00000023e-19 or 4.00000001e-28 < n0_i Initial program 98.1%
*-commutative98.1%
associate-*l*85.7%
*-commutative85.7%
associate-*l*84.2%
distribute-lft-out84.2%
Simplified84.2%
Taylor expanded in normAngle around 0 97.8%
*-commutative97.8%
fma-def97.8%
*-commutative97.8%
Simplified97.8%
Taylor expanded in n0_i around inf 71.9%
if -5.00000023e-19 < n0_i < 4.00000001e-28Initial program 96.6%
*-commutative96.6%
associate-*l*76.9%
*-commutative76.9%
associate-*l*61.4%
distribute-lft-out61.3%
Simplified61.3%
Taylor expanded in normAngle around 0 98.0%
Taylor expanded in n0_i around 0 67.7%
*-commutative67.7%
Simplified67.7%
Final simplification70.5%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n0_i -3.0000000340435383e-18) n0_i (if (<= n0_i 2.1999999301841496e-20) (* u n1_i) n0_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n0_i <= -3.0000000340435383e-18f) {
tmp = n0_i;
} else if (n0_i <= 2.1999999301841496e-20f) {
tmp = u * n1_i;
} 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 (n0_i <= (-3.0000000340435383e-18)) then
tmp = n0_i
else if (n0_i <= 2.1999999301841496e-20) then
tmp = u * n1_i
else
tmp = n0_i
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (n0_i <= Float32(-3.0000000340435383e-18)) tmp = n0_i; elseif (n0_i <= Float32(2.1999999301841496e-20)) tmp = Float32(u * n1_i); else tmp = n0_i; end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (n0_i <= single(-3.0000000340435383e-18)) tmp = n0_i; elseif (n0_i <= single(2.1999999301841496e-20)) tmp = u * n1_i; else tmp = n0_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0\_i \leq -3.0000000340435383 \cdot 10^{-18}:\\
\;\;\;\;n0\_i\\
\mathbf{elif}\;n0\_i \leq 2.1999999301841496 \cdot 10^{-20}:\\
\;\;\;\;u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i\\
\end{array}
\end{array}
if n0_i < -3.00000003e-18 or 2.19999993e-20 < n0_i Initial program 98.7%
Taylor expanded in u around 0 77.6%
Taylor expanded in u around 0 77.2%
Taylor expanded in n0_i around inf 62.6%
if -3.00000003e-18 < n0_i < 2.19999993e-20Initial program 96.5%
*-commutative96.5%
associate-*l*75.0%
*-commutative75.0%
associate-*l*62.0%
distribute-lft-out62.0%
Simplified62.0%
Taylor expanded in normAngle around 0 98.1%
Taylor expanded in n0_i around 0 61.7%
*-commutative61.7%
Simplified61.7%
Final simplification62.2%
(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 97.6%
*-commutative97.6%
associate-*l*82.7%
*-commutative82.7%
associate-*l*76.3%
distribute-lft-out76.3%
Simplified76.3%
Taylor expanded in normAngle around 0 97.9%
Taylor expanded in u around -inf 98.1%
mul-1-neg98.1%
unsub-neg98.1%
mul-1-neg98.1%
unsub-neg98.1%
Simplified98.1%
Final simplification98.1%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (* u n1_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + (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 = n0_i + (u * n1_i)
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(u * n1_i)) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (u * n1_i); end
\begin{array}{l}
\\
n0\_i + u \cdot n1\_i
\end{array}
Initial program 97.6%
Taylor expanded in u around 0 80.6%
Taylor expanded in normAngle around 0 81.1%
*-commutative81.1%
Simplified81.1%
Final simplification81.1%
(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 97.6%
Taylor expanded in u around 0 80.6%
Taylor expanded in u around 0 71.7%
Taylor expanded in n0_i around inf 45.4%
Final simplification45.4%
herbie shell --seed 2024040
(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)))