
(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 10 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 (+ (* (* (sin (* (- 1.0 u) normAngle)) (/ 1.0 (sin normAngle))) n0_i) (* (+ u (* (pow normAngle 2.0) (* -0.16666666666666666 (- (pow u 3.0) u)))) n1_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
return ((sinf(((1.0f - u) * normAngle)) * (1.0f / sinf(normAngle))) * n0_i) + ((u + (powf(normAngle, 2.0f) * (-0.16666666666666666f * (powf(u, 3.0f) - 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 = ((sin(((1.0e0 - u) * normangle)) * (1.0e0 / sin(normangle))) * n0_i) + ((u + ((normangle ** 2.0e0) * ((-0.16666666666666666e0) * ((u ** 3.0e0) - u)))) * n1_i)
end function
function code(normAngle, u, n0_i, n1_i) return Float32(Float32(Float32(sin(Float32(Float32(Float32(1.0) - u) * normAngle)) * Float32(Float32(1.0) / sin(normAngle))) * n0_i) + Float32(Float32(u + Float32((normAngle ^ Float32(2.0)) * Float32(Float32(-0.16666666666666666) * Float32((u ^ Float32(3.0)) - u)))) * n1_i)) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = ((sin(((single(1.0) - u) * normAngle)) * (single(1.0) / sin(normAngle))) * n0_i) + ((u + ((normAngle ^ single(2.0)) * (single(-0.16666666666666666) * ((u ^ single(3.0)) - u)))) * n1_i); end
\begin{array}{l}
\\
\left(\sin \left(\left(1 - u\right) \cdot normAngle\right) \cdot \frac{1}{\sin normAngle}\right) \cdot n0\_i + \left(u + {normAngle}^{2} \cdot \left(-0.16666666666666666 \cdot \left({u}^{3} - u\right)\right)\right) \cdot n1\_i
\end{array}
Initial program 96.9%
Taylor expanded in normAngle around 0 98.9%
distribute-lft-out--98.9%
Simplified98.9%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(+
n0_i
(+
(* u (- n1_i n0_i))
(*
(* normAngle normAngle)
(* u (- (* n0_i 0.3333333333333333) (* -0.16666666666666666 n1_i)))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((u * (n1_i - n0_i)) + ((normAngle * normAngle) * (u * ((n0_i * 0.3333333333333333f) - (-0.16666666666666666f * 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 - n0_i)) + ((normangle * normangle) * (u * ((n0_i * 0.3333333333333333e0) - ((-0.16666666666666666e0) * n1_i)))))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32(u * Float32(n1_i - n0_i)) + Float32(Float32(normAngle * normAngle) * Float32(u * Float32(Float32(n0_i * Float32(0.3333333333333333)) - Float32(Float32(-0.16666666666666666) * n1_i)))))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((u * (n1_i - n0_i)) + ((normAngle * normAngle) * (u * ((n0_i * single(0.3333333333333333)) - (single(-0.16666666666666666) * n1_i))))); end
\begin{array}{l}
\\
n0\_i + \left(u \cdot \left(n1\_i - n0\_i\right) + \left(normAngle \cdot normAngle\right) \cdot \left(u \cdot \left(n0\_i \cdot 0.3333333333333333 - -0.16666666666666666 \cdot n1\_i\right)\right)\right)
\end{array}
Initial program 96.9%
Taylor expanded in u around 0 84.5%
+-commutative84.5%
mul-1-neg84.5%
unsub-neg84.5%
associate-/l*93.6%
associate-*r*93.6%
Simplified93.6%
Taylor expanded in normAngle around 0 98.9%
unpow298.9%
Applied egg-rr98.9%
Taylor expanded in n0_i around 0 98.9%
Final simplification98.9%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (+ (* u (- n1_i n0_i)) (* (* normAngle normAngle) (* 0.16666666666666666 (* u n1_i))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((u * (n1_i - n0_i)) + ((normAngle * normAngle) * (0.16666666666666666f * (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 - n0_i)) + ((normangle * normangle) * (0.16666666666666666e0 * (u * n1_i))))
end function
function code(normAngle, u, n0_i, n1_i) return Float32(n0_i + Float32(Float32(u * Float32(n1_i - n0_i)) + Float32(Float32(normAngle * normAngle) * Float32(Float32(0.16666666666666666) * Float32(u * n1_i))))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((u * (n1_i - n0_i)) + ((normAngle * normAngle) * (single(0.16666666666666666) * (u * n1_i)))); end
\begin{array}{l}
\\
n0\_i + \left(u \cdot \left(n1\_i - n0\_i\right) + \left(normAngle \cdot normAngle\right) \cdot \left(0.16666666666666666 \cdot \left(u \cdot n1\_i\right)\right)\right)
\end{array}
Initial program 96.9%
Taylor expanded in u around 0 84.5%
+-commutative84.5%
mul-1-neg84.5%
unsub-neg84.5%
associate-/l*93.6%
associate-*r*93.6%
Simplified93.6%
Taylor expanded in normAngle around 0 98.9%
unpow298.9%
Applied egg-rr98.9%
Taylor expanded in n0_i around 0 98.8%
*-commutative98.8%
*-commutative98.8%
Simplified98.8%
Final simplification98.8%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ n0_i (+ (* u (- n1_i n0_i)) (* (* normAngle normAngle) (* u (* n0_i 0.3333333333333333))))))
float code(float normAngle, float u, float n0_i, float n1_i) {
return n0_i + ((u * (n1_i - n0_i)) + ((normAngle * normAngle) * (u * (n0_i * 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 * normangle) * (u * (n0_i * 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(Float32(normAngle * normAngle) * Float32(u * Float32(n0_i * Float32(0.3333333333333333)))))) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = n0_i + ((u * (n1_i - n0_i)) + ((normAngle * normAngle) * (u * (n0_i * single(0.3333333333333333))))); end
\begin{array}{l}
\\
n0\_i + \left(u \cdot \left(n1\_i - n0\_i\right) + \left(normAngle \cdot normAngle\right) \cdot \left(u \cdot \left(n0\_i \cdot 0.3333333333333333\right)\right)\right)
\end{array}
Initial program 96.9%
Taylor expanded in u around 0 84.5%
+-commutative84.5%
mul-1-neg84.5%
unsub-neg84.5%
associate-/l*93.6%
associate-*r*93.6%
Simplified93.6%
Taylor expanded in normAngle around 0 98.9%
unpow298.9%
Applied egg-rr98.9%
Taylor expanded in n0_i around inf 98.3%
*-commutative98.3%
Simplified98.3%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(if (or (<= n0_i -2.0000000390829628e-24)
(not (<= n0_i 1.0000000272452012e-27)))
(* (- 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 <= -2.0000000390829628e-24f) || !(n0_i <= 1.0000000272452012e-27f)) {
tmp = (1.0f - u) * n0_i;
} 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 <= (-2.0000000390829628e-24)) .or. (.not. (n0_i <= 1.0000000272452012e-27))) then
tmp = (1.0e0 - u) * n0_i
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(-2.0000000390829628e-24)) || !(n0_i <= Float32(1.0000000272452012e-27))) tmp = Float32(Float32(Float32(1.0) - u) * n0_i); 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(-2.0000000390829628e-24)) || ~((n0_i <= single(1.0000000272452012e-27)))) tmp = (single(1.0) - u) * n0_i; else tmp = u * n1_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n0\_i \leq -2.0000000390829628 \cdot 10^{-24} \lor \neg \left(n0\_i \leq 1.0000000272452012 \cdot 10^{-27}\right):\\
\;\;\;\;\left(1 - u\right) \cdot n0\_i\\
\mathbf{else}:\\
\;\;\;\;u \cdot n1\_i\\
\end{array}
\end{array}
if n0_i < -2.00000004e-24 or 1.00000003e-27 < n0_i Initial program 97.1%
Taylor expanded in u around 0 90.1%
+-commutative90.1%
mul-1-neg90.1%
unsub-neg90.1%
associate-/l*92.3%
associate-*r*92.3%
Simplified92.3%
Taylor expanded in normAngle around 0 98.6%
Taylor expanded in n0_i around inf 75.5%
mul-1-neg75.5%
unsub-neg75.5%
Simplified75.5%
if -2.00000004e-24 < n0_i < 1.00000003e-27Initial program 96.6%
Taylor expanded in n0_i around 0 53.9%
associate-/l*73.0%
*-commutative73.0%
Simplified73.0%
Taylor expanded in normAngle around 0 73.3%
Final simplification74.6%
(FPCore (normAngle u n0_i n1_i)
:precision binary32
(if (or (<= n1_i -1.4500000211417337e-15)
(not (<= n1_i 5.999999920033662e-24)))
(* u n1_i)
n0_i))
float code(float normAngle, float u, float n0_i, float n1_i) {
float tmp;
if ((n1_i <= -1.4500000211417337e-15f) || !(n1_i <= 5.999999920033662e-24f)) {
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 ((n1_i <= (-1.4500000211417337e-15)) .or. (.not. (n1_i <= 5.999999920033662e-24))) 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 ((n1_i <= Float32(-1.4500000211417337e-15)) || !(n1_i <= Float32(5.999999920033662e-24))) 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 ((n1_i <= single(-1.4500000211417337e-15)) || ~((n1_i <= single(5.999999920033662e-24)))) tmp = u * n1_i; else tmp = n0_i; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;n1\_i \leq -1.4500000211417337 \cdot 10^{-15} \lor \neg \left(n1\_i \leq 5.999999920033662 \cdot 10^{-24}\right):\\
\;\;\;\;u \cdot n1\_i\\
\mathbf{else}:\\
\;\;\;\;n0\_i\\
\end{array}
\end{array}
if n1_i < -1.45000002e-15 or 5.99999992e-24 < n1_i Initial program 96.5%
Taylor expanded in n0_i around 0 56.7%
associate-/l*67.5%
*-commutative67.5%
Simplified67.5%
Taylor expanded in normAngle around 0 67.7%
if -1.45000002e-15 < n1_i < 5.99999992e-24Initial program 97.2%
Taylor expanded in u around 0 63.0%
Final simplification65.2%
(FPCore (normAngle u n0_i n1_i) :precision binary32 (+ (* (- 1.0 u) n0_i) (* u n1_i)))
float code(float normAngle, float u, float n0_i, float n1_i) {
return ((1.0f - u) * 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 = ((1.0e0 - u) * n0_i) + (u * n1_i)
end function
function code(normAngle, u, n0_i, n1_i) return Float32(Float32(Float32(Float32(1.0) - u) * n0_i) + Float32(u * n1_i)) end
function tmp = code(normAngle, u, n0_i, n1_i) tmp = ((single(1.0) - u) * n0_i) + (u * n1_i); end
\begin{array}{l}
\\
\left(1 - u\right) \cdot n0\_i + u \cdot n1\_i
\end{array}
Initial program 96.9%
Taylor expanded in normAngle around 0 98.2%
Final simplification98.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 96.9%
Taylor expanded in u around 0 84.5%
+-commutative84.5%
mul-1-neg84.5%
unsub-neg84.5%
associate-/l*93.6%
associate-*r*93.6%
Simplified93.6%
Taylor expanded in normAngle around 0 98.2%
(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 96.9%
Taylor expanded in u around 0 84.5%
+-commutative84.5%
mul-1-neg84.5%
unsub-neg84.5%
associate-/l*93.6%
associate-*r*93.6%
Simplified93.6%
Taylor expanded in normAngle around 0 98.2%
Taylor expanded in n1_i around inf 83.9%
*-commutative83.9%
Simplified83.9%
(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.9%
Taylor expanded in u around 0 45.2%
herbie shell --seed 2024149
(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)))