(FPCore (x y z t a b) :precision binary64 (+ (+ (+ x (* y z)) (* t a)) (* (* a z) b)))
(FPCore (x y z t a b)
:precision binary64
(if (<= a -4.5e-120)
(fma y z (fma a (fma z b t) x))
(if (<= a 1e-50)
(+ (fma t a (fma z y x)) (* b (* a z)))
(fma a (fma b z t) (fma z y x)))))double code(double x, double y, double z, double t, double a, double b) {
return ((x + (y * z)) + (t * a)) + ((a * z) * b);
}
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (a <= -4.5e-120) {
tmp = fma(y, z, fma(a, fma(z, b, t), x));
} else if (a <= 1e-50) {
tmp = fma(t, a, fma(z, y, x)) + (b * (a * z));
} else {
tmp = fma(a, fma(b, z, t), fma(z, y, x));
}
return tmp;
}
function code(x, y, z, t, a, b) return Float64(Float64(Float64(x + Float64(y * z)) + Float64(t * a)) + Float64(Float64(a * z) * b)) end
function code(x, y, z, t, a, b) tmp = 0.0 if (a <= -4.5e-120) tmp = fma(y, z, fma(a, fma(z, b, t), x)); elseif (a <= 1e-50) tmp = Float64(fma(t, a, fma(z, y, x)) + Float64(b * Float64(a * z))); else tmp = fma(a, fma(b, z, t), fma(z, y, x)); end return tmp end
code[x_, y_, z_, t_, a_, b_] := N[(N[(N[(x + N[(y * z), $MachinePrecision]), $MachinePrecision] + N[(t * a), $MachinePrecision]), $MachinePrecision] + N[(N[(a * z), $MachinePrecision] * b), $MachinePrecision]), $MachinePrecision]
code[x_, y_, z_, t_, a_, b_] := If[LessEqual[a, -4.5e-120], N[(y * z + N[(a * N[(z * b + t), $MachinePrecision] + x), $MachinePrecision]), $MachinePrecision], If[LessEqual[a, 1e-50], N[(N[(t * a + N[(z * y + x), $MachinePrecision]), $MachinePrecision] + N[(b * N[(a * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(a * N[(b * z + t), $MachinePrecision] + N[(z * y + x), $MachinePrecision]), $MachinePrecision]]]
\left(\left(x + y \cdot z\right) + t \cdot a\right) + \left(a \cdot z\right) \cdot b
\begin{array}{l}
\mathbf{if}\;a \leq -4.5 \cdot 10^{-120}:\\
\;\;\;\;\mathsf{fma}\left(y, z, \mathsf{fma}\left(a, \mathsf{fma}\left(z, b, t\right), x\right)\right)\\
\mathbf{elif}\;a \leq 10^{-50}:\\
\;\;\;\;\mathsf{fma}\left(t, a, \mathsf{fma}\left(z, y, x\right)\right) + b \cdot \left(a \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(a, \mathsf{fma}\left(b, z, t\right), \mathsf{fma}\left(z, y, x\right)\right)\\
\end{array}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a




Bits error versus b
| Original | 1.8 |
|---|---|
| Target | 0.4 |
| Herbie | 0.5 |
if a < -4.5e-120Initial program 2.7
Simplified0.8
if -4.5e-120 < a < 1.00000000000000001e-50Initial program 0.4
Applied egg-rr0.4
if 1.00000000000000001e-50 < a Initial program 3.5
Simplified0.3
Taylor expanded in y around 0 0.4
Simplified0.3
Final simplification0.5
herbie shell --seed 2022162
(FPCore (x y z t a b)
:name "Graphics.Rasterific.CubicBezier:cachedBezierAt from Rasterific-0.6.1"
:precision binary64
:herbie-target
(if (< z -11820553527347888000.0) (+ (* z (+ (* b a) y)) (+ x (* t a))) (if (< z 4.7589743188364287e-122) (+ (* (+ (* b z) t) a) (+ (* z y) x)) (+ (* z (+ (* b a) y)) (+ x (* t a)))))
(+ (+ (+ x (* y z)) (* t a)) (* (* a z) b)))