\sqrt{\left(x \cdot x + y \cdot y\right) + z \cdot z}\begin{array}{l}
\mathbf{if}\;z \le -1.6603608891381422 \cdot 10^{+118}:\\
\;\;\;\;-z\\
\mathbf{elif}\;z \le 2.4312554970818794 \cdot 10^{+131}:\\
\;\;\;\;\sqrt{\mathsf{fma}\left(z, z, \mathsf{fma}\left(y, y, x \cdot x\right)\right)}\\
\mathbf{else}:\\
\;\;\;\;z\\
\end{array}double f(double x, double y, double z) {
double r28652028 = x;
double r28652029 = r28652028 * r28652028;
double r28652030 = y;
double r28652031 = r28652030 * r28652030;
double r28652032 = r28652029 + r28652031;
double r28652033 = z;
double r28652034 = r28652033 * r28652033;
double r28652035 = r28652032 + r28652034;
double r28652036 = sqrt(r28652035);
return r28652036;
}
double f(double x, double y, double z) {
double r28652037 = z;
double r28652038 = -1.6603608891381422e+118;
bool r28652039 = r28652037 <= r28652038;
double r28652040 = -r28652037;
double r28652041 = 2.4312554970818794e+131;
bool r28652042 = r28652037 <= r28652041;
double r28652043 = y;
double r28652044 = x;
double r28652045 = r28652044 * r28652044;
double r28652046 = fma(r28652043, r28652043, r28652045);
double r28652047 = fma(r28652037, r28652037, r28652046);
double r28652048 = sqrt(r28652047);
double r28652049 = r28652042 ? r28652048 : r28652037;
double r28652050 = r28652039 ? r28652040 : r28652049;
return r28652050;
}




Bits error versus x




Bits error versus y




Bits error versus z
| Original | 35.3 |
|---|---|
| Target | 24.3 |
| Herbie | 24.3 |
if z < -1.6603608891381422e+118Initial program 52.4
Simplified52.4
Taylor expanded around -inf 16.3
Simplified16.3
if -1.6603608891381422e+118 < z < 2.4312554970818794e+131Initial program 27.7
Simplified27.7
if 2.4312554970818794e+131 < z Initial program 55.1
Simplified55.1
Taylor expanded around inf 15.7
Final simplification24.3
herbie shell --seed 2019168 +o rules:numerics
(FPCore (x y z)
:name "FRP.Yampa.Vector3:vector3Rho from Yampa-0.10.2"
:herbie-target
(if (< z -6.396479394109776e+136) (- z) (if (< z 7.320293694404182e+117) (sqrt (+ (+ (* z z) (* x x)) (* y y))) z))
(sqrt (+ (+ (* x x) (* y y)) (* z z))))