math.abs on complex

Average Error: 0.6 → 0.5

Time: 4.7s

Precision: 64

Math

\[\sqrt{\left(\frac{\left(re \cdot re\right)}{\left(im \cdot im\right)}\right)}\]

↓

\[\sqrt{\left(\mathsf{qma}\left(\left(\left(re \cdot re\right)\right), im, im\right)\right)}\]

C

double f(double re, double im) {
        double r1124768 = re;
        double r1124769 = r1124768 * r1124768;
        double r1124770 = im;
        double r1124771 = r1124770 * r1124770;
        double r1124772 = r1124769 + r1124771;
        double r1124773 = sqrt(r1124772);
        return r1124773;
}

↓

double f(double re, double im) {
        double r1124774 = re;
        double r1124775 = r1124774 * r1124774;
        double r1124776 = /*Error: no posit support in C */;
        double r1124777 = im;
        double r1124778 = /*Error: no posit support in C */;
        double r1124779 = /*Error: no posit support in C */;
        double r1124780 = sqrt(r1124779);
        return r1124780;
}

Error

Bits error versus re

Bits error versus im

Derivation

1. Initial program 0.6

   \[\sqrt{\left(\frac{\left(re \cdot re\right)}{\left(im \cdot im\right)}\right)}\]
2. Using strategy rm

3. Applied introduce-quire 0.6

   \[\leadsto \sqrt{\left(\frac{\color{blue}{\left(\left(\left(re \cdot re\right)\right)\right)}}{\left(im \cdot im\right)}\right)}\]

4. Applied insert-quire-fdp-add 0.5

   \[\leadsto \sqrt{\color{blue}{\left(\left(\mathsf{qma}\left(\left(\left(re \cdot re\right)\right), im, im\right)\right)\right)}}\]

5. Final simplification 0.5

   \[\leadsto \sqrt{\left(\mathsf{qma}\left(\left(\left(re \cdot re\right)\right), im, im\right)\right)}\]

Reproduce

herbie shell --seed 2019163 
(FPCore (re im)
  :name "math.abs on complex"
  (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))))