\sqrt{x - 1} \cdot \sqrt{x}\left(\sqrt{x} \cdot \sqrt{\sqrt[3]{x - 1}}\right) \cdot \sqrt{\sqrt[3]{x - 1} \cdot \sqrt[3]{x - 1}}double f(double x) {
double r820157 = x;
double r820158 = 1.0;
double r820159 = r820157 - r820158;
double r820160 = sqrt(r820159);
double r820161 = sqrt(r820157);
double r820162 = r820160 * r820161;
return r820162;
}
double f(double x) {
double r820163 = x;
double r820164 = sqrt(r820163);
double r820165 = 1.0;
double r820166 = r820163 - r820165;
double r820167 = cbrt(r820166);
double r820168 = sqrt(r820167);
double r820169 = r820164 * r820168;
double r820170 = r820167 * r820167;
double r820171 = sqrt(r820170);
double r820172 = r820169 * r820171;
return r820172;
}



Bits error versus x
Results
Initial program 0.5
rmApplied add-cube-cbrt0.9
Applied sqrt-prod0.8
Applied associate-*l*0.8
Final simplification0.8
herbie shell --seed 2019163
(FPCore (x)
:name "sqrt times"
(* (sqrt (- x 1)) (sqrt x)))