x \cdot x - \left(y \cdot 4\right) \cdot \left(z \cdot z - t\right)
\begin{array}{l}
\mathbf{if}\;z \cdot z \le 1.2800532743869097 \cdot 10^{275}:\\
\;\;\;\;x \cdot x - \left(y \cdot 4\right) \cdot \left(z \cdot z - t\right)\\
\mathbf{else}:\\
\;\;\;\;x \cdot x - \left(\left(y \cdot 4\right) \cdot \left(z + \sqrt{t}\right)\right) \cdot \left(z - \sqrt{t}\right)\\
\end{array}double f(double x, double y, double z, double t) {
double r652213 = x;
double r652214 = r652213 * r652213;
double r652215 = y;
double r652216 = 4.0;
double r652217 = r652215 * r652216;
double r652218 = z;
double r652219 = r652218 * r652218;
double r652220 = t;
double r652221 = r652219 - r652220;
double r652222 = r652217 * r652221;
double r652223 = r652214 - r652222;
return r652223;
}
double f(double x, double y, double z, double t) {
double r652224 = z;
double r652225 = r652224 * r652224;
double r652226 = 1.2800532743869097e+275;
bool r652227 = r652225 <= r652226;
double r652228 = x;
double r652229 = r652228 * r652228;
double r652230 = y;
double r652231 = 4.0;
double r652232 = r652230 * r652231;
double r652233 = t;
double r652234 = r652225 - r652233;
double r652235 = r652232 * r652234;
double r652236 = r652229 - r652235;
double r652237 = sqrt(r652233);
double r652238 = r652224 + r652237;
double r652239 = r652232 * r652238;
double r652240 = r652224 - r652237;
double r652241 = r652239 * r652240;
double r652242 = r652229 - r652241;
double r652243 = r652227 ? r652236 : r652242;
return r652243;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 6.1 |
|---|---|
| Target | 6.1 |
| Herbie | 3.9 |
if (* z z) < 1.2800532743869097e+275Initial program 0.1
if 1.2800532743869097e+275 < (* z z) Initial program 52.0
rmApplied add-sqr-sqrt58.4
Applied difference-of-squares58.4
Applied associate-*r*32.9
Final simplification3.9
herbie shell --seed 2020036
(FPCore (x y z t)
:name "Graphics.Rasterific.Shading:$sradialGradientWithFocusShader from Rasterific-0.6.1, B"
:precision binary64
:herbie-target
(- (* x x) (* 4 (* y (- (* z z) t))))
(- (* x x) (* (* y 4) (- (* z z) t))))