1 - \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\frac{\left(\sqrt[3]{\left(\sqrt{0.5} + \sqrt{\frac{0.5}{\mathsf{hypot}\left(1, x\right)}}\right) \cdot \left(\sqrt{0.5} - \sqrt{\frac{0.5}{\mathsf{hypot}\left(1, x\right)}}\right)} \cdot \sqrt[3]{\left(\sqrt{0.5} + \sqrt{\frac{0.5}{\mathsf{hypot}\left(1, x\right)}}\right) \cdot \left(\sqrt{0.5} - \sqrt{\frac{0.5}{\mathsf{hypot}\left(1, x\right)}}\right)}\right) \cdot \sqrt[3]{\left(\sqrt{0.5} + \sqrt{\frac{0.5}{\mathsf{hypot}\left(1, x\right)}}\right) \cdot \left(\sqrt{0.5} - \sqrt{\frac{0.5}{\mathsf{hypot}\left(1, x\right)}}\right)}}{1 + \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}}double code(double x) {
return ((double) (1.0 - ((double) sqrt(((double) (0.5 * ((double) (1.0 + ((double) (1.0 / ((double) hypot(1.0, x))))))))))));
}
double code(double x) {
return ((double) (((double) (((double) (((double) cbrt(((double) (((double) (((double) sqrt(0.5)) + ((double) sqrt(((double) (0.5 / ((double) hypot(1.0, x)))))))) * ((double) (((double) sqrt(0.5)) - ((double) sqrt(((double) (0.5 / ((double) hypot(1.0, x)))))))))))) * ((double) cbrt(((double) (((double) (((double) sqrt(0.5)) + ((double) sqrt(((double) (0.5 / ((double) hypot(1.0, x)))))))) * ((double) (((double) sqrt(0.5)) - ((double) sqrt(((double) (0.5 / ((double) hypot(1.0, x)))))))))))))) * ((double) cbrt(((double) (((double) (((double) sqrt(0.5)) + ((double) sqrt(((double) (0.5 / ((double) hypot(1.0, x)))))))) * ((double) (((double) sqrt(0.5)) - ((double) sqrt(((double) (0.5 / ((double) hypot(1.0, x)))))))))))))) / ((double) (1.0 + ((double) sqrt(((double) (0.5 * ((double) (1.0 + ((double) (1.0 / ((double) hypot(1.0, x))))))))))))));
}



Bits error versus x
Results
Initial program 15.4
rmApplied flip--15.4
Simplified14.9
Taylor expanded around 0 14.9
Simplified14.9
rmApplied add-sqr-sqrt30.5
Applied add-sqr-sqrt15.4
Applied difference-of-squares15.4
rmApplied add-cube-cbrt15.4
Final simplification15.4
herbie shell --seed 2020156
(FPCore (x)
:name "Given's Rotation SVD example, simplified"
:precision binary64
(- 1.0 (sqrt (* 0.5 (+ 1.0 (/ 1.0 (hypot 1.0 x)))))))