
(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 13 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 (- (/ n1_i (/ (sin normAngle) normAngle)) (/ n0_i (/ (sin normAngle) (* normAngle (cos normAngle))))) n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
return fmaf(u, ((n1_i / (sinf(normAngle) / normAngle)) - (n0_i / (sinf(normAngle) / (normAngle * cosf(normAngle))))), n0_i);
}
function code(normAngle, u, n0_i, n1_i) return fma(u, Float32(Float32(n1_i / Float32(sin(normAngle) / normAngle)) - Float32(n0_i / Float32(sin(normAngle) / Float32(normAngle * cos(normAngle))))), n0_i) end
\begin{array}{l}
\\
\mathsf{fma}\left(u, \frac{n1_i}{\frac{\sin normAngle}{normAngle}} - \frac{n0_i}{\frac{\sin normAngle}{normAngle \cdot \cos normAngle}}, n0_i\right)
\end{array}
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(+
n0_i
(+
(*
(pow normAngle 2.0)
(* u (+ (* n0_i 0.3333333333333333) (* n1_i 0.16666666666666666))))
(* u (- n1_i n0_i)))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((powf(normAngle, 2.0f) * (u * ((n0_i * 0.3333333333333333f) + (n1_i * 0.16666666666666666f)))) + (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 + (((normangle ** 2.0e0) * (u * ((n0_i * 0.3333333333333333e0) + (n1_i * 0.16666666666666666e0)))) + (u * (n1_i - n0_i)))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32((normAngle ^ Float32(2.0)) * Float32(u * Float32(Float32(n0_i * Float32(0.3333333333333333)) + Float32(n1_i * Float32(0.16666666666666666))))) + Float32(u * Float32(n1_i - n0_i)))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (((normAngle ^ single(2.0)) * (u * ((n0_i * single(0.3333333333333333)) + (n1_i * single(0.16666666666666666))))) + (u * (n1_i - n0_i))); end
\begin{array}{l}
\\
n0_i + \left({normAngle}^{2} \cdot \left(u \cdot \left(n0_i \cdot 0.3333333333333333 + n1_i \cdot 0.16666666666666666\right)\right) + u \cdot \left(n1_i - n0_i\right)\right)
\end{array}
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (+ (* (pow normAngle 2.0) (* u (* n1_i 0.16666666666666666))) (* u (- n1_i n0_i)))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((powf(normAngle, 2.0f) * (u * (n1_i * 0.16666666666666666f))) + (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 + (((normangle ** 2.0e0) * (u * (n1_i * 0.16666666666666666e0))) + (u * (n1_i - n0_i)))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32((normAngle ^ Float32(2.0)) * Float32(u * Float32(n1_i * Float32(0.16666666666666666)))) + Float32(u * Float32(n1_i - n0_i)))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + (((normAngle ^ single(2.0)) * (u * (n1_i * single(0.16666666666666666)))) + (u * (n1_i - n0_i))); end
\begin{array}{l}
\\
n0_i + \left({normAngle}^{2} \cdot \left(u \cdot \left(n1_i \cdot 0.16666666666666666\right)\right) + u \cdot \left(n1_i - n0_i\right)\right)
\end{array}
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (- (* n1_i (+ u (* 0.16666666666666666 (* u (pow normAngle 2.0))))) (* u n0_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((n1_i * (u + (0.16666666666666666f * (u * powf(normAngle, 2.0f))))) - (u * 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 + ((n1_i * (u + (0.16666666666666666e0 * (u * (normangle ** 2.0e0))))) - (u * n0_i))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32(n1_i * Float32(u + Float32(Float32(0.16666666666666666) * Float32(u * (normAngle ^ Float32(2.0)))))) - Float32(u * n0_i))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((n1_i * (u + (single(0.16666666666666666) * (u * (normAngle ^ single(2.0)))))) - (u * n0_i)); end
\begin{array}{l}
\\
n0_i + \left(n1_i \cdot \left(u + 0.16666666666666666 \cdot \left(u \cdot {normAngle}^{2}\right)\right) - u \cdot n0_i\right)
\end{array}
(FPCore (normAngle u n0_i n1_i) :precision binary32 (- n0_i (* u (- n0_i (+ n1_i (* 0.16666666666666666 (* n1_i (pow normAngle 2.0))))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i - (u * (n0_i - (n1_i + (0.16666666666666666f * (n1_i * powf(normAngle, 2.0f))))));
}
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 * (n0_i - (n1_i + (0.16666666666666666e0 * (n1_i * (normangle ** 2.0e0))))))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i - Float32(u * Float32(n0_i - Float32(n1_i + Float32(Float32(0.16666666666666666) * Float32(n1_i * (normAngle ^ Float32(2.0)))))))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i - (u * (n0_i - (n1_i + (single(0.16666666666666666) * (n1_i * (normAngle ^ single(2.0))))))); end
\begin{array}{l}
\\
n0_i - u \cdot \left(n0_i - \left(n1_i + 0.16666666666666666 \cdot \left(n1_i \cdot {normAngle}^{2}\right)\right)\right)
\end{array}
(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}
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(if (or (<= n0_i -3.500000191654701e-27)
(not (<= n0_i 3.0000000817356035e-27)))
(* 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 <= -3.500000191654701e-27f) || !(n0_i <= 3.0000000817356035e-27f)) {
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 <= (-3.500000191654701e-27)) .or. (.not. (n0_i <= 3.0000000817356035e-27))) 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(-3.500000191654701e-27)) || !(n0_i <= Float32(3.0000000817356035e-27))) 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(-3.500000191654701e-27)) || ~((n0_i <= single(3.0000000817356035e-27)))) 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 -3.500000191654701 \cdot 10^{-27} \lor \neg \left(n0_i \leq 3.0000000817356035 \cdot 10^{-27}\right):\\
\;\;\;\;n0_i \cdot \left(1 - u\right)\\
\mathbf{else}:\\
\;\;\;\;u \cdot n1_i\\
\end{array}
\end{array}
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (- (* u n1_i) (* u n0_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((u * n1_i) - (u * 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) - (u * n0_i))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32(u * n1_i) - Float32(u * n0_i))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((u * n1_i) - (u * n0_i)); end
\begin{array}{l}
\\
n0_i + \left(u \cdot n1_i - u \cdot n0_i\right)
\end{array}
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n0_i -5.000000229068525e-19) n0_i (if (<= n0_i 3.0000000817356035e-27) (* u n1_i) n0_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n0_i <= -5.000000229068525e-19f) {
tmp = n0_i;
} else if (n0_i <= 3.0000000817356035e-27f) {
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 <= (-5.000000229068525e-19)) then
tmp = n0_i
else if (n0_i <= 3.0000000817356035e-27) 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(-5.000000229068525e-19)) tmp = n0_i; elseif (n0_i <= Float32(3.0000000817356035e-27)) 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(-5.000000229068525e-19)) tmp = n0_i; elseif (n0_i <= single(3.0000000817356035e-27)) tmp = u * n1_i; else tmp = n0_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0_i \leq -5.000000229068525 \cdot 10^{-19}:\\
\;\;\;\;n0_i\\
\mathbf{elif}\;n0_i \leq 3.0000000817356035 \cdot 10^{-27}:\\
\;\;\;\;u \cdot n1_i\\
\mathbf{else}:\\
\;\;\;\;n0_i\\
\end{array}
\end{array}
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n0_i -9.99999983775159e-18) (* n0_i (- 1.0 u)) (+ n0_i (* u n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n0_i <= -9.99999983775159e-18f) {
tmp = n0_i * (1.0f - u);
} else {
tmp = n0_i + (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 <= (-9.99999983775159e-18)) then
tmp = n0_i * (1.0e0 - u)
else
tmp = n0_i + (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(-9.99999983775159e-18)) tmp = Float32(n0_i * Float32(Float32(1.0) - u)); else tmp = Float32(n0_i + 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(-9.99999983775159e-18)) tmp = n0_i * (single(1.0) - u); else tmp = n0_i + (u * n1_i); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0_i \leq -9.99999983775159 \cdot 10^{-18}:\\
\;\;\;\;n0_i \cdot \left(1 - u\right)\\
\mathbf{else}:\\
\;\;\;\;n0_i + u \cdot n1_i\\
\end{array}
\end{array}
(FPCore (normAngle u n0_i n1_i) :precision binary32 (if (<= n0_i -9.99999983775159e-18) (- n0_i (* u n0_i)) (+ n0_i (* u n1_i))))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if (n0_i <= -9.99999983775159e-18f) {
tmp = n0_i - (u * n0_i);
} else {
tmp = n0_i + (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 <= (-9.99999983775159e-18)) then
tmp = n0_i - (u * n0_i)
else
tmp = n0_i + (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(-9.99999983775159e-18)) tmp = Float32(n0_i - Float32(u * n0_i)); else tmp = Float32(n0_i + 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(-9.99999983775159e-18)) tmp = n0_i - (u * n0_i); else tmp = n0_i + (u * n1_i); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0_i \leq -9.99999983775159 \cdot 10^{-18}:\\
\;\;\;\;n0_i - u \cdot n0_i\\
\mathbf{else}:\\
\;\;\;\;n0_i + u \cdot n1_i\\
\end{array}
\end{array}
(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}
(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}
herbie shell --seed 2023350
(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)))