\left|\frac{1}{\sqrt{\pi}} \cdot \left(\left(\left(2 \cdot \left|x\right| + \frac{2}{3} \cdot \left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left|x\right|\right)\right) + \frac{1}{5} \cdot \left(\left(\left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right)\right) + \frac{1}{21} \cdot \left(\left(\left(\left(\left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right)\right)\right|\left|\frac{1}{\sqrt{\pi}} \cdot \left(\left(\left(2 \cdot \left|x\right| + \frac{2}{3} \cdot \left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left|x\right|\right)\right) + \frac{1}{5} \cdot \left(\left(\left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right)\right) + \frac{1}{21} \cdot \left(\left(\left(\left(\left(\left|{\left(\left|x\right|\right)}^{\frac{3}{2}}\right| \cdot \left|{\left(\left|x\right|\right)}^{\frac{3}{2}}\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right) \cdot \left|x\right|\right)\right)\right|double f(double x) {
double r195009 = 1.0;
double r195010 = atan2(1.0, 0.0);
double r195011 = sqrt(r195010);
double r195012 = r195009 / r195011;
double r195013 = 2.0;
double r195014 = x;
double r195015 = fabs(r195014);
double r195016 = r195013 * r195015;
double r195017 = 3.0;
double r195018 = r195013 / r195017;
double r195019 = r195015 * r195015;
double r195020 = r195019 * r195015;
double r195021 = r195018 * r195020;
double r195022 = r195016 + r195021;
double r195023 = 5.0;
double r195024 = r195009 / r195023;
double r195025 = r195020 * r195015;
double r195026 = r195025 * r195015;
double r195027 = r195024 * r195026;
double r195028 = r195022 + r195027;
double r195029 = 21.0;
double r195030 = r195009 / r195029;
double r195031 = r195026 * r195015;
double r195032 = r195031 * r195015;
double r195033 = r195030 * r195032;
double r195034 = r195028 + r195033;
double r195035 = r195012 * r195034;
double r195036 = fabs(r195035);
return r195036;
}
double f(double x) {
double r195037 = 1.0;
double r195038 = atan2(1.0, 0.0);
double r195039 = sqrt(r195038);
double r195040 = r195037 / r195039;
double r195041 = 2.0;
double r195042 = x;
double r195043 = fabs(r195042);
double r195044 = r195041 * r195043;
double r195045 = 3.0;
double r195046 = r195041 / r195045;
double r195047 = r195043 * r195043;
double r195048 = r195047 * r195043;
double r195049 = r195046 * r195048;
double r195050 = r195044 + r195049;
double r195051 = 5.0;
double r195052 = r195037 / r195051;
double r195053 = r195048 * r195043;
double r195054 = r195053 * r195043;
double r195055 = r195052 * r195054;
double r195056 = r195050 + r195055;
double r195057 = 21.0;
double r195058 = r195037 / r195057;
double r195059 = 1.5;
double r195060 = pow(r195043, r195059);
double r195061 = fabs(r195060);
double r195062 = r195061 * r195061;
double r195063 = r195062 * r195043;
double r195064 = r195063 * r195043;
double r195065 = r195064 * r195043;
double r195066 = r195065 * r195043;
double r195067 = r195058 * r195066;
double r195068 = r195056 + r195067;
double r195069 = r195040 * r195068;
double r195070 = fabs(r195069);
return r195070;
}



Bits error versus x
Results
Initial program 0.2
rmApplied add-sqr-sqrt0.2
Simplified0.2
Simplified0.2
Final simplification0.2
herbie shell --seed 2020020
(FPCore (x)
:name "Jmat.Real.erfi, branch x less than or equal to 0.5"
:precision binary64
(fabs (* (/ 1 (sqrt PI)) (+ (+ (+ (* 2 (fabs x)) (* (/ 2 3) (* (* (fabs x) (fabs x)) (fabs x)))) (* (/ 1 5) (* (* (* (* (fabs x) (fabs x)) (fabs x)) (fabs x)) (fabs x)))) (* (/ 1 21) (* (* (* (* (* (* (fabs x) (fabs x)) (fabs x)) (fabs x)) (fabs x)) (fabs x)) (fabs x)))))))