\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 r90513 = 1.0;
double r90514 = atan2(1.0, 0.0);
double r90515 = sqrt(r90514);
double r90516 = r90513 / r90515;
double r90517 = 2.0;
double r90518 = x;
double r90519 = fabs(r90518);
double r90520 = r90517 * r90519;
double r90521 = 3.0;
double r90522 = r90517 / r90521;
double r90523 = r90519 * r90519;
double r90524 = r90523 * r90519;
double r90525 = r90522 * r90524;
double r90526 = r90520 + r90525;
double r90527 = 5.0;
double r90528 = r90513 / r90527;
double r90529 = r90524 * r90519;
double r90530 = r90529 * r90519;
double r90531 = r90528 * r90530;
double r90532 = r90526 + r90531;
double r90533 = 21.0;
double r90534 = r90513 / r90533;
double r90535 = r90530 * r90519;
double r90536 = r90535 * r90519;
double r90537 = r90534 * r90536;
double r90538 = r90532 + r90537;
double r90539 = r90516 * r90538;
double r90540 = fabs(r90539);
return r90540;
}
double f(double x) {
double r90541 = 1.0;
double r90542 = atan2(1.0, 0.0);
double r90543 = sqrt(r90542);
double r90544 = r90541 / r90543;
double r90545 = 2.0;
double r90546 = x;
double r90547 = fabs(r90546);
double r90548 = r90545 * r90547;
double r90549 = 3.0;
double r90550 = r90545 / r90549;
double r90551 = r90547 * r90547;
double r90552 = r90551 * r90547;
double r90553 = r90550 * r90552;
double r90554 = r90548 + r90553;
double r90555 = 5.0;
double r90556 = r90541 / r90555;
double r90557 = r90552 * r90547;
double r90558 = r90557 * r90547;
double r90559 = r90556 * r90558;
double r90560 = r90554 + r90559;
double r90561 = 21.0;
double r90562 = r90541 / r90561;
double r90563 = r90558 * r90547;
double r90564 = r90563 * r90547;
double r90565 = r90562 * r90564;
double r90566 = r90560 + r90565;
double r90567 = r90544 * r90566;
double r90568 = fabs(r90567);
return r90568;
}



Bits error versus x
Results
Initial program 0.2
Final simplification0.2
herbie shell --seed 2019326
(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)))))))