\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|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|double f(double x) {
double r109224 = 1.0;
double r109225 = atan2(1.0, 0.0);
double r109226 = sqrt(r109225);
double r109227 = r109224 / r109226;
double r109228 = 2.0;
double r109229 = x;
double r109230 = fabs(r109229);
double r109231 = r109228 * r109230;
double r109232 = 3.0;
double r109233 = r109228 / r109232;
double r109234 = r109230 * r109230;
double r109235 = r109234 * r109230;
double r109236 = r109233 * r109235;
double r109237 = r109231 + r109236;
double r109238 = 5.0;
double r109239 = r109224 / r109238;
double r109240 = r109235 * r109230;
double r109241 = r109240 * r109230;
double r109242 = r109239 * r109241;
double r109243 = r109237 + r109242;
double r109244 = 21.0;
double r109245 = r109224 / r109244;
double r109246 = r109241 * r109230;
double r109247 = r109246 * r109230;
double r109248 = r109245 * r109247;
double r109249 = r109243 + r109248;
double r109250 = r109227 * r109249;
double r109251 = fabs(r109250);
return r109251;
}
double f(double x) {
double r109252 = 1.0;
double r109253 = atan2(1.0, 0.0);
double r109254 = sqrt(r109253);
double r109255 = r109252 / r109254;
double r109256 = 2.0;
double r109257 = x;
double r109258 = fabs(r109257);
double r109259 = r109256 * r109258;
double r109260 = 3.0;
double r109261 = r109256 / r109260;
double r109262 = r109258 * r109258;
double r109263 = r109262 * r109258;
double r109264 = r109261 * r109263;
double r109265 = r109259 + r109264;
double r109266 = 5.0;
double r109267 = r109252 / r109266;
double r109268 = r109263 * r109258;
double r109269 = r109268 * r109258;
double r109270 = r109267 * r109269;
double r109271 = r109265 + r109270;
double r109272 = 21.0;
double r109273 = r109252 / r109272;
double r109274 = r109269 * r109258;
double r109275 = r109274 * r109258;
double r109276 = r109273 * r109275;
double r109277 = r109271 + r109276;
double r109278 = r109255 * r109277;
double r109279 = fabs(r109278);
return r109279;
}



Bits error versus x
Results
Initial program 0.2
Final simplification0.2
herbie shell --seed 2020047 +o rules:numerics
(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)))))))