
(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 (/ normAngle (sin normAngle)))) (+ n0_i (* (* u n1_i) (- t_0 (* n0_i (* t_0 (/ (cos normAngle) n1_i))))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float t_0 = normAngle / sinf(normAngle);
return n0_i + ((u * n1_i) * (t_0 - (n0_i * (t_0 * (cosf(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 = normangle / sin(normangle)
code = n0_i + ((u * n1_i) * (t_0 - (n0_i * (t_0 * (cos(normangle) / n1_i)))))
end function
function code(normAngle, u, n0_i, n1_i) t_0 = Float32(normAngle / sin(normAngle)) return Float32(n0_i + Float32(Float32(u * n1_i) * Float32(t_0 - Float32(n0_i * Float32(t_0 * Float32(cos(normAngle) / n1_i)))))) end
function tmp = code(normAngle, u, n0_i, n1_i) t_0 = normAngle / sin(normAngle); tmp = n0_i + ((u * n1_i) * (t_0 - (n0_i * (t_0 * (cos(normAngle) / n1_i))))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{normAngle}{\sin normAngle}\\
n0\_i + \left(u \cdot n1\_i\right) \cdot \left(t\_0 - n0\_i \cdot \left(t\_0 \cdot \frac{\cos normAngle}{n1\_i}\right)\right)
\end{array}
\end{array}
Initial program 96.1%
fma-define96.1%
associate-*r/96.4%
*-rgt-identity96.4%
associate-*r/97.6%
*-rgt-identity97.6%
Simplified97.6%
Taylor expanded in n1_i around inf 62.8%
Taylor expanded in u around 0 67.2%
associate-*r*67.3%
*-commutative67.3%
+-commutative67.3%
mul-1-neg67.3%
unsub-neg67.3%
associate-/l*67.8%
*-commutative67.8%
times-frac98.8%
Simplified98.8%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (* (* u n1_i) (- (/ normAngle (sin normAngle)) (/ n0_i n1_i)))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((u * n1_i) * ((normAngle / sinf(normAngle)) - (n0_i / 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) * ((normangle / sin(normangle)) - (n0_i / n1_i)))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32(u * n1_i) * Float32(Float32(normAngle / sin(normAngle)) - Float32(n0_i / n1_i)))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((u * n1_i) * ((normAngle / sin(normAngle)) - (n0_i / n1_i))); end
\begin{array}{l}
\\
n0\_i + \left(u \cdot n1\_i\right) \cdot \left(\frac{normAngle}{\sin normAngle} - \frac{n0\_i}{n1\_i}\right)
\end{array}
Initial program 96.1%
fma-define96.1%
associate-*r/96.4%
*-rgt-identity96.4%
associate-*r/97.6%
*-rgt-identity97.6%
Simplified97.6%
Taylor expanded in n1_i around inf 62.8%
Taylor expanded in u around 0 67.2%
associate-*r*67.3%
*-commutative67.3%
+-commutative67.3%
mul-1-neg67.3%
unsub-neg67.3%
associate-/l*67.8%
*-commutative67.8%
times-frac98.8%
Simplified98.8%
Taylor expanded in normAngle around 0 98.4%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (fma u (- n1_i n0_i) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, (n1_i - n0_i), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, Float32(n1_i - n0_i), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, n1\_i - n0\_i, n0\_i\right)
\end{array}
Initial program 96.1%
fma-define96.1%
associate-*r/96.4%
*-rgt-identity96.4%
associate-*r/97.6%
*-rgt-identity97.6%
Simplified97.6%
Taylor expanded in normAngle around 0 97.7%
Taylor expanded in u around 0 93.7%
mul-1-neg93.7%
unsub-neg93.7%
associate-*r*93.7%
Simplified93.7%
Taylor expanded in normAngle around 0 97.4%
+-commutative97.4%
fma-define97.5%
Simplified97.5%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(if (or (<= n0_i -1.4999999800084155e-24)
(not (<= n0_i 1.999999936531045e-21)))
(* 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 <= -1.4999999800084155e-24f) || !(n0_i <= 1.999999936531045e-21f)) {
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 <= (-1.4999999800084155e-24)) .or. (.not. (n0_i <= 1.999999936531045e-21))) 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(-1.4999999800084155e-24)) || !(n0_i <= Float32(1.999999936531045e-21))) 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(-1.4999999800084155e-24)) || ~((n0_i <= single(1.999999936531045e-21)))) 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 -1.4999999800084155 \cdot 10^{-24} \lor \neg \left(n0\_i \leq 1.999999936531045 \cdot 10^{-21}\right):\\
\;\;\;\;n0\_i \cdot \left(1 - u\right)\\
\mathbf{else}:\\
\;\;\;\;u \cdot n1\_i\\
\end{array}
\end{array}
if n0_i < -1.49999998e-24 or 1.9999999e-21 < n0_i Initial program 97.0%
fma-define97.0%
associate-*r/97.4%
*-rgt-identity97.4%
associate-*r/98.7%
*-rgt-identity98.7%
Simplified98.7%
Taylor expanded in n0_i around inf 72.6%
*-commutative72.6%
associate-*r/81.5%
Simplified81.5%
Taylor expanded in normAngle around 0 81.0%
if -1.49999998e-24 < n0_i < 1.9999999e-21Initial program 94.5%
fma-define94.5%
associate-*r/94.6%
*-rgt-identity94.6%
associate-*r/95.5%
*-rgt-identity95.5%
Simplified95.5%
Taylor expanded in normAngle around 0 96.6%
Taylor expanded in u around inf 65.6%
*-commutative65.6%
Simplified65.6%
Final simplification75.5%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n0_i -1.4999999800084155e-24) n0_i (if (<= n0_i 1.999999936531045e-21) (* u n1_i) n0_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n0_i <= -1.4999999800084155e-24f) {
tmp = n0_i;
} else if (n0_i <= 1.999999936531045e-21f) {
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 <= (-1.4999999800084155e-24)) then
tmp = n0_i
else if (n0_i <= 1.999999936531045e-21) 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(-1.4999999800084155e-24)) tmp = n0_i; elseif (n0_i <= Float32(1.999999936531045e-21)) 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(-1.4999999800084155e-24)) tmp = n0_i; elseif (n0_i <= single(1.999999936531045e-21)) tmp = u * n1_i; else tmp = n0_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0\_i \leq -1.4999999800084155 \cdot 10^{-24}:\\
\;\;\;\;n0\_i\\
\mathbf{elif}\;n0\_i \leq 1.999999936531045 \cdot 10^{-21}:\\
\;\;\;\;u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i\\
\end{array}
\end{array}
if n0_i < -1.49999998e-24 or 1.9999999e-21 < n0_i Initial program 97.0%
fma-define97.0%
associate-*r/97.4%
*-rgt-identity97.4%
associate-*r/98.7%
*-rgt-identity98.7%
Simplified98.7%
Taylor expanded in u around 0 60.0%
if -1.49999998e-24 < n0_i < 1.9999999e-21Initial program 94.5%
fma-define94.5%
associate-*r/94.6%
*-rgt-identity94.6%
associate-*r/95.5%
*-rgt-identity95.5%
Simplified95.5%
Taylor expanded in normAngle around 0 96.6%
Taylor expanded in u around inf 65.6%
*-commutative65.6%
Simplified65.6%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= u 0.006000000052154064) (+ n0_i (* u n1_i)) (- n0_i (* n0_i u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (u <= 0.006000000052154064f) {
tmp = n0_i + (u * n1_i);
} else {
tmp = n0_i - (n0_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 (u <= 0.006000000052154064e0) then
tmp = n0_i + (u * n1_i)
else
tmp = n0_i - (n0_i * u)
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (u <= Float32(0.006000000052154064)) tmp = Float32(n0_i + Float32(u * n1_i)); else tmp = Float32(n0_i - Float32(n0_i * u)); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (u <= single(0.006000000052154064)) tmp = n0_i + (u * n1_i); else tmp = n0_i - (n0_i * u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;u \leq 0.006000000052154064:\\
\;\;\;\;n0\_i + u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i - n0\_i \cdot u\\
\end{array}
\end{array}
if u < 0.00600000005Initial program 95.7%
fma-define95.7%
associate-*r/95.9%
*-rgt-identity95.9%
associate-*r/97.1%
*-rgt-identity97.1%
Simplified97.1%
Taylor expanded in normAngle around 0 97.8%
Taylor expanded in u around 0 88.7%
fma-undefine88.7%
*-un-lft-identity88.7%
Applied egg-rr88.7%
if 0.00600000005 < u Initial program 97.2%
fma-define97.3%
associate-*r/97.7%
*-rgt-identity97.7%
associate-*r/99.1%
*-rgt-identity99.1%
Simplified99.1%
Taylor expanded in n0_i around inf 60.0%
*-commutative60.0%
associate-*r/71.1%
Simplified71.1%
Taylor expanded in normAngle around 0 69.6%
sub-neg69.6%
distribute-rgt-in69.6%
*-un-lft-identity69.6%
Applied egg-rr69.6%
Final simplification83.9%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= u 0.006000000052154064) (+ n0_i (* u n1_i)) (* n0_i (- 1.0 u))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (u <= 0.006000000052154064f) {
tmp = n0_i + (u * n1_i);
} else {
tmp = n0_i * (1.0f - 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 (u <= 0.006000000052154064e0) then
tmp = n0_i + (u * n1_i)
else
tmp = n0_i * (1.0e0 - u)
end if
code = tmp
end function
function code(normAngle, u, n0_i, n1_i) tmp = Float32(0.0) if (u <= Float32(0.006000000052154064)) tmp = Float32(n0_i + Float32(u * n1_i)); else tmp = Float32(n0_i * Float32(Float32(1.0) - u)); end return tmp end
function tmp_2 = code(normAngle, u, n0_i, n1_i) tmp = single(0.0); if (u <= single(0.006000000052154064)) tmp = n0_i + (u * n1_i); else tmp = n0_i * (single(1.0) - u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;u \leq 0.006000000052154064:\\
\;\;\;\;n0\_i + u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i \cdot \left(1 - u\right)\\
\end{array}
\end{array}
if u < 0.00600000005Initial program 95.7%
fma-define95.7%
associate-*r/95.9%
*-rgt-identity95.9%
associate-*r/97.1%
*-rgt-identity97.1%
Simplified97.1%
Taylor expanded in normAngle around 0 97.8%
Taylor expanded in u around 0 88.7%
fma-undefine88.7%
*-un-lft-identity88.7%
Applied egg-rr88.7%
if 0.00600000005 < u Initial program 97.2%
fma-define97.3%
associate-*r/97.7%
*-rgt-identity97.7%
associate-*r/99.1%
*-rgt-identity99.1%
Simplified99.1%
Taylor expanded in n0_i around inf 60.0%
*-commutative60.0%
associate-*r/71.1%
Simplified71.1%
Taylor expanded in normAngle around 0 69.6%
(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 96.1%
fma-define96.1%
associate-*r/96.4%
*-rgt-identity96.4%
associate-*r/97.6%
*-rgt-identity97.6%
Simplified97.6%
Taylor expanded in normAngle around 0 97.7%
Taylor expanded in u around 0 93.7%
mul-1-neg93.7%
unsub-neg93.7%
associate-*r*93.7%
Simplified93.7%
Taylor expanded in normAngle around 0 97.4%
(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 96.1%
fma-define96.1%
associate-*r/96.4%
*-rgt-identity96.4%
associate-*r/97.6%
*-rgt-identity97.6%
Simplified97.6%
Taylor expanded in u around 0 47.0%
herbie shell --seed 2024137
(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)))