e^{\log \left(\sqrt{x.re \cdot x.re + x.im \cdot x.im}\right) \cdot y.re - \tan^{-1}_* \frac{x.im}{x.re} \cdot y.im} \cdot \cos \left(\log \left(\sqrt{x.re \cdot x.re + x.im \cdot x.im}\right) \cdot y.im + \tan^{-1}_* \frac{x.im}{x.re} \cdot y.re\right)double f(double x_re, double x_im, double y_re, double y_im) {
double r8112 = x_re;
double r8113 = r8112 * r8112;
double r8114 = x_im;
double r8115 = r8114 * r8114;
double r8116 = r8113 + r8115;
double r8117 = sqrt(r8116);
double r8118 = log(r8117);
double r8119 = y_re;
double r8120 = r8118 * r8119;
double r8121 = atan2(r8114, r8112);
double r8122 = y_im;
double r8123 = r8121 * r8122;
double r8124 = r8120 - r8123;
double r8125 = exp(r8124);
double r8126 = r8118 * r8122;
double r8127 = r8121 * r8119;
double r8128 = r8126 + r8127;
double r8129 = cos(r8128);
double r8130 = r8125 * r8129;
return r8130;
}
Please include this information when filing a bug report:
herbie shell --seed 2019194 +o rules:numerics
(FPCore (x.re x.im y.re y.im)
:name "powComplex, real part"
(* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))
| result arity mismatch; expected number of values not received expected: 2 received: 1 in: local-binding form values...: 0 | L | C | |
|---|---|---|---|
| loop | /data/pavpan/nightlies/herbie/various-cleanup/src/core/extraction.rkt | 25 | 2 |
| (unnamed) | /data/pavpan/nightlies/herbie/various-cleanup/src/core/simplify.rkt | 26 | 0 |
| simplify! | /data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt | 220 | 0 |
| run-improve47 | /data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt | 342 | 0 |
| (unnamed) | /opt/racket-7.0/collects/racket/private/more-scheme.rkt | 261 | 28 |
| run | /opt/racket-7.0/share/pkgs/profile-lib/main.rkt | 39 | 2 |
| profile-thunk16 | /opt/racket-7.0/share/pkgs/profile-lib/main.rkt | 9 | 0 |
| (unnamed) | /opt/racket-7.0/collects/racket/private/more-scheme.rkt | 261 | 28 |